Sfoglia il codice sorgente

* adjust stack correctly in a_op_stack

git-svn-id: branches/wasm@48256 -
nickysn 4 anni fa
parent
commit
fdf1f7d966
1 ha cambiato i file con 2 aggiunte e 0 eliminazioni
  1. 2 0
      compiler/wasm32/hlcgcpu.pas

+ 2 - 0
compiler/wasm32/hlcgcpu.pas

@@ -511,6 +511,7 @@ implementation
                 if TOpCG2IAsmOp[op]=A_None then
                   internalerror(2010120532);
                 list.concat(taicpu.op_none(TOpCG2IAsmOp[op]));
+                decstack(list,1);
               end;
             maybe_adjust_op_result(list,op,size);
           end;
@@ -540,6 +541,7 @@ implementation
                 if TOpCG2LAsmOp[op]=A_None then
                   internalerror(2010120533);
                 list.concat(taicpu.op_none(TOpCG2LAsmOp[op]));
+                decstack(list,1);
               end;
           end;
         else