Browse Source

* 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 years ago
parent
commit
bc8c1ea1bc
1 changed files with 3 additions and 0 deletions
  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}