Parsecで四則演算パーサー

前回から始まったParsec編も今回でついに最終回となりました。今回は少し背伸びをして四則演算パーサーに思い切って挑戦してみたいと思います。 えいっ! import Text.ParserCombinators.Parsec main = do cs <- getContents case parse expr "" cs of Right answer -> putStrLn "Answer:" >> print answer Left err -> pu…