ack/mach/i86/libem/sti.s
1985-02-07 15:33:13 +00:00

18 lines
238 B
ArmAsm

.define .sti
! $Header$
! #bytes in cx
! destination address in di
.sti:
pop bx ! return address
sar cx,1
jnb 1f
pop ax
stosb
jmp bx
1:
mov si,sp
rep movs
mov sp,si
jmp bx