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

* replaced or cx,cx/jz with jcxz in IndexByte, IndexWord and IndexDWord for i8086

Browse Source 
git-svn-id: trunk@31961 -
This commit is contained in:
nickysn 2015-10-06 14:55:51 +00:00
parent 3752047dd4
commit 5e3a88b7f5
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/i8086/i8086.inc
View File

@ -166,8 +166,7 @@ function IndexByte(Const buf;len:SizeInt;b:byte):SizeInt; assembler; nostackfram
asm
mov bx, sp
mov cx, ss:[bx + 4 + extra_param_offset] // len
or cx, cx
jz @@NotFound
jcxz @@NotFound
{$ifdef FPC_X86_DATA_NEAR}
mov di, ss:[bx + 6 + extra_param_offset] // @buf
mov ax, ds
@ -200,8 +199,7 @@ function IndexWord(Const buf;len:SizeInt;b:word):SizeInt; assembler; nostackfram
asm
mov bx, sp
mov cx, ss:[bx + 4 + extra_param_offset] // len
or cx, cx
jz @@NotFound
jcxz @@NotFound
{$ifdef FPC_X86_DATA_NEAR}
mov di, ss:[bx + 6 + extra_param_offset] // @buf
mov ax, ds
@ -234,8 +232,7 @@ function IndexDWord(Const buf;len:SizeInt;b:DWord):SizeInt; assembler; nostackfr
asm
mov bx, sp
mov cx, ss:[bx + 6 + extra_param_offset] // len
or cx, cx
jz @@NotFound
jcxz @@NotFound
{$ifdef FPC_X86_DATA_NEAR}
mov di, ss:[bx + 8 + extra_param_offset] // @buf
mov ax, ds