parsing - Attoparsec: 複数文字の区切り文字までスキップする (ただし含まない)

Question

ほとんどすべての文字を含むことができる文字列があります。文字列の中に delimiter があり{{{ます。

例: afskjdfakjsdfkjas{{{fasdf.

attoparsec を使用して、 のParser ()前のすべての文字をスキップするが、 ?{{{を消費しないa の慣用的な書き方は何{{{ですか?

Answer 1

次のように少し難しい方法で行うことができます。

foo = many $ do
  Just c <- fmap (const Nothing) (try $ string "{{{") <|> fmap Just anyChar
  return c

manyTillまたは、このヘルパー関数を次のように使用できます。

foo = manyTill anyChar (try $ string "{{{")