_ldfps X
1: ldfps = 170100^tst 2: / 3: / ldfps(number); 4: 5: .globl _ldfps 6: _ldfps: 7: mov r5,-(sp) 8: mov sp,r5 9: ldfps 4(r5) 10: mov (sp)+,r5 11: rts pc