ack/mach/i386/libem/ior.s
1989-01-19 16:43:32 +00:00

19 lines
238 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define .ior
! #bytes in ecx
.ior:
pop ebx ! return address
mov edx,edi
mov edi,esp
add edi,ecx
sar ecx,1
1:
pop eax
or eax,(edi)
stos
loop 1b
mov edi,edx
jmp ebx