ack/mach/vax4/libem/ior.s
1994-06-24 14:02:31 +00:00

15 lines
207 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .ior
! $Id$
! bytes in r0
.ior:
movl (sp)+,r2
addl3 r0,sp,r1
ashl $-2,r0,r0
I1:
bisl2 (sp)+,(r1)+
sobgtr r0,I1
jmp (r2)