ack/mach/pdp/libem/rmi.s
1987-05-15 09:11:10 +00:00

22 lines
299 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define rmi~
.extern unknown~,rmi4~
! $Header$
rmi~:
mov (sp)+,r3
cmp r0,$04
bgt 1f
beq 2f
mov 02(sp),r1
sxt r0
div (sp)+,r0
mov r1,(sp)
br 3f
2: jsr pc,rmi4~
mov r1,-(sp)
mov r0,-(sp)
3: jmp (r3)
1: jmp unknown~