ack/mach/vax4/libem/rck4.s

21 lines
310 B
ArmAsm
Raw Normal View History

1985-01-18 14:30:03 +00:00
#include "em_abs.h"
1990-01-12 10:29:26 +00:00
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define .rck4
1985-01-18 14:30:03 +00:00
1990-01-12 10:29:26 +00:00
! $Header$
1985-01-18 14:30:03 +00:00
.rck4:
movl (sp)+,r1
movl (sp)+,r0
1990-01-12 10:29:26 +00:00
cmpl (sp),(r0) ! compare lower bound
blss Ierr
cmpl (sp),4(r0) ! compare upper bound
bgtr Ierr
1985-01-18 14:30:03 +00:00
jmp (r1)
1990-01-12 10:29:26 +00:00
Ierr:
1985-01-18 14:30:03 +00:00
pushl r1
pushl $ERANGE
jsb .trp
rsb