@@ -1,15 +1,15 @@
.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define .loi
+.define .los
! #bytes in cx
! address in bx
! save si/di. they might be register variables
-.loi:
- pop ax
+.los:
mov dx,si
mov si,bx
- mov bx,ax
+ pop bx
mov ax,cx
sar cx,1
jnb 1f
@@ -20,6 +20,16 @@
jmp bx
1:
sub sp,ax
+ jmp 1f
+
+.loi:
+ ! only called with size > 4
+ mov dx,si
+ mov si,bx
+ sub sp,cx
+ sar cx,1
+1:
mov ax,di
mov di,sp
rep movs
@@ -1,21 +1,27 @@
.define .sti
+.define .sts
! save di/si. they might be register variables
-.sti:
+.sts:
mov dx,di ! save di
- pop ax ! return address
mov di,bx
pop ax
stosb
mov di,dx
+.sti:
+ ! only called with count > 4
+ mov dx,di
+ mov di,bx
mov ax,si
mov si,sp