# HG changeset patch
# User sheepluva
# Date 1447442504 -3600
# Node ID 210f12d368229e8547118f3c7e7342756bc68229
# Parent  ea5edb4e5245328c28e273c89772ab9ccdddf958
revert my pas2c modification

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