ack/mach/i86/libem/dup.s
1985-02-17 00:57:20 +00:00

13 lines
142 B
ArmAsm

.define .dup
! $Header$
! #bytes in cx
.dup:
pop bx ! return address
mov si,sp
sub sp,cx
mov di,sp
sar cx,1
rep movs
jmp bx