述語pを満足する一文字用のパーサー sat p を定義する。 def sat(p: Char => Boolean): Parser[Char] = { item.flatMap(x => p(x) match { case true => succeed(x) case false => failure }) } これを使えば、数字・アルファベットとかのパーサーも。 def d…