ack/mach/vax4/libem/lxl.s

17 lines
219 B
ArmAsm
Raw Normal View History

1990-01-12 10:29:26 +00:00
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .lxl
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
! nlevels in r0 (>=2)
1985-01-18 14:30:03 +00:00
.lxl:
pushl r0
decl (sp)
movl 4(ap),r0
1990-01-12 10:29:26 +00:00
I1:
1985-01-18 14:30:03 +00:00
jsb .lpb
movl (r0),r0
1990-01-12 10:29:26 +00:00
sobgtr (sp),I1
1985-01-18 14:30:03 +00:00
tstl (sp)+
rsb