clear the object memory at startup if we have -Oremove-bss

Author: totalspectrum

backends/asm/outasm.c

@@ -6795,12 +6795,10 @@ EmitMain_P1(IRList *irl, Module *P)
         if ( (gl_optimize_flags & OPT_REMOVE_HUB_BSS) ) {
             EmitOp2(irl, OPC_ADD, stackptr, objbase);
         }
-        if (!gl_p2) {
-            // we will need local01, it is referred to in
-            // the LMM code
-            Operand *local1 = GetLocalReg(0, 0);
-            local1->used = 1;
-        }
+        // we will need local01, it is referred to in
+        // the LMM code
+        Operand *local1 = GetLocalReg(0, 0);
+        local1->used = 1;
     }
 
     if (InCog(firstfunc)) {
@@ -6882,7 +6880,10 @@ EmitMain_P2(IRList *irl, Module *P, Operand *lutstart)
     EmitJump(irl, COND_NE, spinlabel);
     if ( (gl_optimize_flags & OPT_REMOVE_HUB_BSS) ) {
         EmitOp2(irl, OPC_MOV, stackptr, objbase);
-        EmitOp2(irl, OPC_ADD, stackptr, NewImmediate(current->varsize));
+//        EmitOp2(irl, OPC_ADD, stackptr, NewImmediate(current->varsize));
+        EmitOp1(irl, OPC_SETQ, NewImmediate(current->varsize/LONG_SIZE));
+        ir = EmitOp2(irl, OPC_WRLONG, NewImmediate(0), stackptr);
+        ir->srceffect = OPEFFECT_POSTINC;
     } else {
         EmitMove(irl, stackptr, stacklabel, NULL);
     }