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

17 lines
259 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.sect .text
.define cfi~
.extern setfloat~,setint~
! $Header$
cfi~:
mov (sp)+,r1
mov (sp)+,r0
jsr pc,setint~
mov (sp)+,r0
jsr pc,setfloat~
movf (sp)+,r0
movfi r0,-(sp)
setd;seti
jmp (r1)