5文字の入力がある場合、OKと表示し、 そうでない場合に、NGと表示する例 module Main where import System.IO import Text.ParserCombinators.Parsec main = getContents >>= return . ngok . parseSimple >>= print parseSimple input = parse simple "(un…

標準入力から"abc"と入力されたかをチェックするParsecの例 プログラム module Main where import System.IO import Text.ParserCombinators.Parsec main = getContents >>= return . parseSimple >>= print parseSimple input = parse simple "(unknown)" i…