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

15 lines
148 B
ArmAsm

.define .com
! $Header$
! #bytes in cx
.com:
pop bx ! return address
mov di,sp
sar cx,1
1:
not (di)
inc di
inc di
loop 1b
jmp bx