home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / src / libc / gen / ldfps.s < prev    next >
Encoding:
Text File  |  1979-01-10  |  121 b   |  12 lines
  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
  12.