Browse Source

* fixed thlcgcpu.g_exception_reason_save_const always generating a 286+ push
instruction on i8086, regardless of current cpu level

git-svn-id: trunk@30352 -

nickysn 10 years ago
parent
commit
003b283e55
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/i8086/hlcgcpu.pas

+ 1 - 1
compiler/i8086/hlcgcpu.pas

@@ -413,7 +413,7 @@ implementation
   procedure thlcgcpu.g_exception_reason_save_const(list: TAsmList; size: tdef; a: tcgint; const href: treference);
     begin
       if not paramanager.use_fixed_stack then
-        list.concat(Taicpu.op_const(A_PUSH,tcgsize2opsize[def_cgsize(size)],a))
+        tcg8086(cg).push_const(list,def_cgsize(size),a)
       else
         inherited;
     end;