空 (長さ 0) の入力でParser ()
成功し (そして を返し)、他のすべての場合に失敗するtype の値が必要です。()
pSatisfy (const False)
必要なことを十分に行っていません。pEnd
この目的には適切とは思えません。
pExact 0 pAscii
正確な「定義による」ソリューションかもしれません。まだ動作していないようです:
ghci> runParser "<input>" (pSymbol "aaa" <|> pSymbol "bbb" <|> pExact 0 pAscii) ""
*** Exception: ambiguous parser?