ack/mach/i86/libem/dup.s
1985-02-07 15:33:13 +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