lookAhead and error propagation about parsec

[aslatter]

Just to make sure I'm not being dense - the parser p in your example could never succeed with any input, correct?

[redneb]

Correct. I guess the example is a bit contrived, but my point is that p should report correctly why it failed. In this instance, many1 $ char 'a' is tried first and succeeds, then the input stream is rewound back to the beginning and then char 'b' is tried which fails because it didn't find an 'b'. But the error message does not indicate that.

Here's another example:

variable :: Parser String
variable = do
    x <- lookAhead (many1 letter)
    if x == "return"
        then fail "'return' is a reserved keyword"
        else string x

Then parse p "" "return" currently fails with

Left (line 1, column 7):
unexpected end of input
expecting letter

With my patch it gives the following error:

Left (line 1, column 1):
return is a reserved keyword

The problem is that many1 letter succeeds having consumed the 6 letters of "returned". But it also generates an message about the end of input when many1 tries to apply letter for a seventh time. Then the input stream is rewound by lookAhead, and fail is called on the beginning of input. But parserBind ignores that error because it prefers the error that occurred later in the input. I claim that this error is irrelevant here because we have rewound the input stream.

[aslatter]

Oh, yes, I agree with you that your patch makes sense. I just wanted to make sure I understood your example.

If at all possible lookAhead should not update our parser-state when it succeeds.

[aslatter]

Fixed in f7faa2a.