Bladeren bron

* bug fix in the 32-bit parameters handling in tcg8086.a_load_const_cgpara

git-svn-id: branches/i8086@23824 -
nickysn 12 jaren geleden
bovenliggende
commit
e956ffc27b
1 gewijzigde bestanden met toevoegingen van 2 en 2 verwijderingen
  1. 2 2
      compiler/i8086/cgcpu.pas

+ 2 - 2
compiler/i8086/cgcpu.pas

@@ -351,8 +351,8 @@ unit cgcpu;
                 if cgpara.alignment <> 4 then
                   internalerror(2013031101);
 
-                list.concat(taicpu.op_const(A_PUSH,tcgsize2opsize[pushsize],a shr 16));
-                list.concat(taicpu.op_const(A_PUSH,tcgsize2opsize[pushsize],a and $FFFF));
+                list.concat(taicpu.op_const(A_PUSH,S_W,a shr 16));
+                list.concat(taicpu.op_const(A_PUSH,S_W,a and $FFFF));
               end
             else
               begin