failOnEOF :: Parser ()
failOnEOF = do e <- eof; when e $ fail "Unexpected end of input"
failOnEOF :: Parser ()
failOnEOF = do e <- eof; when e $ fail "Unexpected end of input"
failOnEOF = do e <- eof; when e $ fail "Unexpected end of input"