Cross Reference: /src/lib/libm/arch/i387/s_significandf.S

s_significandf.S revision 1.2

      1 /*
      2  * Written by J.T. Conklin <jtc (at) netbsd.org>.
      3  * Public domain.
      4  */
      5 
      6 #include <machine/asm.h>
      7 
      8 RCSID("$Id: s_significandf.S,v 1.2 1995/04/28 22:44:22 jtc Exp $")
      9 
     10 ENTRY(significandf)
     11 	flds	4(%esp)
     12 	fxtract
     13 	fstpl	%st(1)
     14 	ret
     15