paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 04:29:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use 16-bit LEA directly in fpc_SetJmp, since that instruction is now supported

Browse Source 
by the compiler

git-svn-id: trunk@25809 -
This commit is contained in:
nickysn 2013-10-17 17:33:55 +00:00
parent 4aa010eedc
commit f30fddec53
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/i8086/setjump.inc
View File

@ -25,9 +25,7 @@ asm
mov ax, word ss:[si + 2] mov ax, word ss:[si + 2]
mov word [bx + Jmp_buf.cs], ax mov word [bx + Jmp_buf.cs], ax
{$endif FPC_X86_CODE_FAR} {$endif FPC_X86_CODE_FAR}
// the fpc inline asm reader doesn't support 16-bit LEA it seems... lea ax, [si + 4 + extra_param_offset]
// lea ax, [si + 4 + extra_param_offset]
db 08Dh, 044h, 4 + extra_param_offset
mov word [bx + Jmp_buf.sp], ax mov word [bx + Jmp_buf.sp], ax
xor ax, ax xor ax, ax