2011-05-20から1日間の記事一覧

第8章 関数型パーサー #3

間を空けると感覚が鈍ってだめだなあ。 パーサーの部品 ひたすら写経。 import Data.Char sat :: (Char -> Bool) -> Parser Char sat p = item >>- \x -> if p x then return' x else failure digit :: Parser Char digit = sat isDigit lower :: Parser Cha…