ack/mach/vax4/libem/sru.s

22 lines
321 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 .sru
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
.sru:
movl (sp)+,r3
cmpl r0,$4
beql .sru4
pushl $EILLINS
jmp .fat
.sru4:
movl (sp)+,r2
mnegl r2,r2
movl (sp)+,r0
clrl r1
ashq r2,r0,r0
movl r0,-(sp)
jmp (r3)