ack/mach/vax4/libem/rck4.s

20 lines
247 B
ArmAsm

#include "em_abs.h"
# $Header$
.globl .rck4
.rck4:
movl (sp)+,r1
movl (sp)+,r0
cmpl (sp),(r0) # compare lower bound
blss Lerr
cmpl (sp),4(r0) # compare upper bound
bgtr Lerr
jmp (r1)
Lerr:
pushl r1
pushl $ERANGE
jsb .trp
rsb