diff -r ea5edb4e5245 -r 210f12d36822 tools/pas2c/PascalParser.hs --- a/tools/pas2c/PascalParser.hs Wed Nov 11 23:49:23 2015 +0100 +++ b/tools/pas2c/PascalParser.hs Fri Nov 13 20:21:44 2015 +0100 @@ -198,7 +198,7 @@ char' ';' comments return u - sequenceDecl = (parens pas) $ (commaSep pas) (iD >>= \i -> optional (spaces >> string' ":=" >> spaces >> integer pas) >> return i) + sequenceDecl = (parens pas) $ (commaSep pas) (iD >>= \i -> optional (spaces >> char' '=' >> spaces >> integer pas) >> return i) functionType = do fp <- try (string "function") <|> try (string "procedure") comments