diff -r b8b208501475 -r f1b5f1dc61a3 tools/pas2c/PascalParser.hs --- a/tools/pas2c/PascalParser.hs Wed Nov 11 19:25:56 2015 +0100 +++ b/tools/pas2c/PascalParser.hs Wed Nov 11 20:50:01 2015 +0100 @@ -198,7 +198,7 @@ char' ';' comments return u - sequenceDecl = (parens pas) $ (commaSep pas) (iD >>= \i -> optional (spaces >> char' '=' >> spaces >> integer pas) >> return i) + sequenceDecl = (parens pas) $ (commaSep pas) (iD >>= \i -> optional (spaces >> string' ":=" >> spaces >> integer pas) >> return i) functionType = do fp <- try (string "function") <|> try (string "procedure") comments