فهرست منبع

* fixed get_caller_frame() for win16 (on that platform, bp is incremented by
one, before pushing, to indicate a far call, so it has to be aligned by 2
again, after reading)

git-svn-id: trunk@37657 -

nickysn 7 سال پیش
والد
کامیت
bc8c1ea1bc
1فایلهای تغییر یافته به همراه3 افزوده شده و 0 حذف شده
  1. 3 0
      rtl/i8086/i8086.inc

+ 3 - 0
rtl/i8086/i8086.inc

@@ -601,6 +601,9 @@ asm
   jz @@Lgnf_null
   xchg ax, si  // 1 byte shorter than a mov
   seges lodsw
+ {$ifdef WIN16}
+  and al, $FE
+ {$endif WIN16}
   mov dx, es
 @@Lgnf_null:
 {$endif FPC_X86_DATA_NEAR}