some fixes

This commit is contained in:
ceriel 1987-06-09 15:15:18 +00:00
parent 7698c135be
commit 85023f4c14
3 changed files with 17 additions and 1 deletions

View file

@ -54,3 +54,4 @@ ret8.s
lfr6.s
lfr8.s
retarea.s
blm.s

15
mach/i86/libem/blm.s Normal file
View file

@ -0,0 +1,15 @@
.sect .text
.define .blm
! cx: count in words
.blm:
mov bx,sp
mov ax,si
mov dx,di
mov di,2(bx)
mov si,4(bx)
rep movs
mov si,ax
mov di,dx
ret 4

View file

@ -15,7 +15,7 @@
xor di,di
sar cx,1
1:
mov dx,4(bx)(di)
mov 4(bx)(di),dx
add di,2
loop 1b
!endif