diff -r a7efecf4f49f -r c3a535886806 tools/pas2c/PascalParser.hs --- 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) [