Преглед на файлове

* 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 години
родител
ревизия
003b283e55
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  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;