[Haskell-cafe] Parsec : Problems with operator precedence (solution)

[Erik de Castro Lopo]

Erik de Castro Lopo wrote:

>     binaryOp :: String -> (SourcePos -> a -> a -> a) -> E.Assoc -> E.Operator Char st a
>     binaryOp name con assoc =
>         E.Infix (reservedOp name >>
>             getPosition >>=
>             return . con) assoc

Replacing reservedOp above with:

    reservedOpNf :: String -> CharParser st ()
    reservedOpNf name = try (reservedOp name >> notFollowedBy (oneOf "|&="))

fixed the problem.

Cheers,
Erik
-- 
-----------------------------------------------------------------
Erik de Castro Lopo
-----------------------------------------------------------------
"If dolphins are so smart, why do they live in igloos?" -Eric Cartman