ack/mach/i86/libem/sti.s
1985-02-17 00:57:20 +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