ack/mach/i86/libem/xor.s

16 lines
160 B
ArmAsm
Raw Normal View History

1985-02-07 15:33:13 +00:00
.define .xor
! $Header$
! #bytes in cx
.xor:
pop bx ! return address
mov di,sp
add di,cx
sar cx,1
1:
pop ax
xor ax,(di)
stos
loop 1b
jmp bx