Mercurial Mercurial > sheepy-clone / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix pas2c enum type parsing sdl2transition
authorsheepluva
Wed, 11 Nov 2015 20:50:01 +0100
branchsdl2transition
changeset 11357 f1b5f1dc61a3
parent 11356 b8b208501475
child 11358 a91c4c4fd85c
fix pas2c enum type parsing
tools/pas2c/PascalParser.hs file | annotate | diff | comparison | revisions 
--- 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
sheepy-clone