ack/mach/pdp/libem/ngf.s
1984-07-19 13:34:12 +00:00

12 lines
112 B
ArmAsm

/ $Header$
.text
.globl ngf~
.globl setfloat~
ngf~:
mov (sp)+,r1
jsr pc,setfloat~
negf (sp)
setd
jmp (r1)