mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 21:09:24 +02:00
* use rep movsw in crt.dosmemmove for i8086-msdos
git-svn-id: trunk@24681 -
This commit is contained in:
parent
0446ccbba7
commit
68a80ccc66
@ -61,11 +61,19 @@ asm
|
||||
mov es, ax
|
||||
mov di, dofs
|
||||
mov si, sofs
|
||||
mov cx, count
|
||||
mov dx, count
|
||||
mov cx, dx
|
||||
mov ax, sseg
|
||||
push ds
|
||||
mov ds, ax
|
||||
shr cx, 1
|
||||
jz @@1
|
||||
rep movsw
|
||||
@@1:
|
||||
and dl, 1
|
||||
jz @@2
|
||||
rep movsb
|
||||
@@2:
|
||||
pop ds
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user