From 7489bfb56b451e1e2a576e5cb8cd047c5c50b707 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Sun, 27 Oct 2013 11:36:45 +0000
Subject: [PATCH] * fixed get_caller_addr returning the wrong segment in i8086
 medium memory model

git-svn-id: trunk@25859 -
---
 rtl/i8086/i8086.inc | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/rtl/i8086/i8086.inc b/rtl/i8086/i8086.inc
index b1d983269b..f4a2dce261 100644
--- a/rtl/i8086/i8086.inc
+++ b/rtl/i8086/i8086.inc
@@ -132,12 +132,11 @@ asm
   mov ax, ss:[si + 4 + extra_param_offset + extra_param_offset]  // framebp
   or ax, ax
   jz @@Lg_a_null
-  xchg ax, bx
-  mov bx, [bx+2]
+  xchg ax, bx  // 1 byte shorter than a mov
+  mov ax, [bx+2]
 {$ifdef FPC_X86_CODE_FAR}
   mov dx, [bx+4]
 {$endif FPC_X86_CODE_FAR}
-  xchg ax, bx
 @@Lg_a_null:
 end;