ack/mach/vax4/libem/cmand.s

16 lines
212 B
ArmAsm
Raw Permalink Normal View History

1990-01-12 10:29:26 +00:00
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .cmand
1985-01-18 14:30:03 +00:00
1994-06-24 14:02:31 +00:00
! $Id$
1990-01-12 10:29:26 +00:00
! bytes in r0
1985-01-18 14:30:03 +00:00
.cmand:
movl (sp)+,r2
addl3 r0,sp,r1
ashl $-2,r0,r0
1990-01-12 10:29:26 +00:00
I1:
1985-01-18 14:30:03 +00:00
bicl2 (sp)+,(r1)+
1990-01-12 10:29:26 +00:00
sobgtr r0,I1
1985-01-18 14:30:03 +00:00
jmp (r2)