ack/mach/vax4/libem/and.s
1990-01-12 10:29:26 +00:00

16 lines
223 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .and
! $Header$
! bytes in r0
.and:
movl (sp)+,r3
addl3 r0,sp,r1
ashl $-2,r0,r0
1:
mcoml (sp)+,r2
bicl2 r2,(r1)+
sobgtr r0,1b
jmp (r3)