Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tools/pas2c/PascalParser.hs
changeset 11398 c3a535886806
parent 11370 210f12d36822
child 14235 3a9e4f35aa68 
--- a/tools/pas2c/PascalParser.hs	Mon Nov 16 15:20:49 2015 +0100
+++ b/tools/pas2c/PascalParser.hs	Mon Nov 16 15:21:20 2015 +0100
@@ -239,10 +239,10 @@
     ] <?> "range declaration"
     where
     rangeft = do
-    e1 <- initExpression
-    string' ".."
-    e2 <- initExpression
-    return $ RangeFromTo e1 e2
+        e1 <- initExpression
+        string' ".."
+        e2 <- initExpression
+        return $ RangeFromTo e1 e2
 
 typeVarDeclaration :: Bool -> Parsec String u [TypeVarDeclaration]
 typeVarDeclaration isImpl = (liftM concat . many . choice) [
hedgewars