Bläddra i källkod

* fixed the decstack balancing in thlcgwasm.a_cmp_stack_stack

git-svn-id: branches/wasm@48042 -
nickysn 4 år sedan
förälder
incheckning
d85e70bbb4
1 ändrade filer med 2 tillägg och 2 borttagningar
  1. 2 2
      compiler/wasm32/hlcgcpu.pas

+ 2 - 2
compiler/wasm32/hlcgcpu.pas

@@ -849,12 +849,12 @@ implementation
                 OS_S32,OS_32:
                 OS_S32,OS_32:
                   begin
                   begin
                     list.concat(taicpu.op_none(opcmp32[cmp_op]));
                     list.concat(taicpu.op_none(opcmp32[cmp_op]));
-                    decstack(list,2);
+                    decstack(list,1);
                   end;
                   end;
                 OS_64,OS_S64:
                 OS_64,OS_S64:
                   begin
                   begin
                     list.concat(taicpu.op_none(opcmp64[cmp_op]));
                     list.concat(taicpu.op_none(opcmp64[cmp_op]));
-                    decstack(list,2);
+                    decstack(list,1);
                   end;
                   end;
                 else
                 else
                   internalerror(2010120538);
                   internalerror(2010120538);