ack/mach/i86/libem/xor.s
1987-01-08 10:13:48 +00:00

17 lines
202 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define .xor
! #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