Разбор строк литералов с FParsec?

Question

Я хотел бы разбирать строковые литералы с помощью FParsec. Под «строковых литералов» Я имею в виду что-то между открытием и закрывающей кавычки (в моем случае - одинарная кавычка):

'Please, switch off your mobile phone' 

То, что я сейчас делаю это следующее:

let string = between (pstring "'") (pstring "'") (manySatisfy isLetter) 

Но это останавливается после того, как первое письмо потребляется. Есть ли способ сделать это жадным?

Answer 1

Это уже жадный; manySatisfy isLetter анализирует последовательность букв из входного потока.

Проблема заключается в том, что синтаксический анализатор не с , или пространствами, поскольку они не являются буквами. Это может быть исправлено с помощью:

manyChars (noneOf "'") 

или более явно с помощью:

manySatisfy ((<>) '\'') 

вместо этого.