ack/mach/vax4/libem/cui.s

26 lines
305 B
ArmAsm
Raw Normal View History

1985-01-18 14:30:03 +00:00
#include "em_abs.h"
# $Header$
1985-01-18 14:30:03 +00:00
.globl .cui
.cui:
movl (sp)+,r1
movl (sp)+,r0
cmpl r0,$4
bneq Lerr
movl (sp)+,r0
cmpl r0,$4
bneq Lerr
tstl (sp)
bgeq L1
jbr Liovfl
L1:
jmp (r1)
Lerr:
pushl $EILLINS
jmp .fat
Liovfl:
pushl $EIOVFL
jmp .trp