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

15 lines
218 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define fef~
.extern setfloat~
! $Header$
fef~:
mov (sp)+,r1
jsr pc,setfloat~
movf (sp),r0
movei r0,-(sp)
movie $0,r0
movf r0,02(sp)
setd
jmp (r1)