duskos

commit 0b756a4655726eb38df46f6a0c3921fd2e125a29
parent a654fb1c745335c108fd98019a2f32feebf2c28c
Author: Virgil Dupras <hsoft@hardcoded.net>
Date:   Wed,  5 Jul 2023 09:19:52 -0400

comp/c: alignment discipline on initcode

All CC tests pass on ARM!

Diffstat:
M
fs/comp/c/fgen.fs
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/fs/comp/c/fgen.fs b/fs/comp/c/fgen.fs
@@ -152,7 +152,7 @@ MAXSWITCHCASES << Stack :new structbind Stack _cases
   parseDeclarator ( cdecl )
   dup _locvars ?dup if CDecl :append else to _locvars then begin ( cdecl )
     '=' readChar? if ( cdecl )
-      _initcode not if here to _initcode then
+      _initcode not if here# to _initcode then
     nextt parseExpression ( cdecl eop )
     dup ExprOp :isarray? if ExprOp arg over _copyArray else
       ExprOp :>W$ dup ExprOp :cdecl ExprOp :hal# !, then