# HG changeset patch # User alfadur # Date 1542609473 -10800 # Node ID 81fba21495a5209bf1ab8e1d0b6da18ade43a36f # Parent 0f8b647ea317dc46ee7bf8c8b7a33ec55c4a9ce8 was a wrong copy apparently diff -r 0f8b647ea317 -r 81fba21495a5 tools/pas2c/Pas2C.hs --- a/tools/pas2c/Pas2C.hs Mon Nov 19 09:29:37 2018 +0300 +++ b/tools/pas2c/Pas2C.hs Mon Nov 19 09:37:53 2018 +0300 @@ -779,7 +779,7 @@ lt <- gets lastType r1' <- initExpr2C (InitRange r1) r2' <- initExpr2C (InitRange r2) - return $ \i -> t' i <> brackets r2' <> brackets r1' + return $ \i -> t' i <> brackets r1' <> brackets r2' type2C' (ArrayDecl (Just r) t) = do t' <- type2C t lt <- gets lastType