* 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 -

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}