sysdeps/libm-i387/s_significandl.S

   1 /*
   2  * Written by J.T. Conklin <jtc@netbsd.org>.
   3  * Changes for long double by Ulrich Drepper <drepper@cygnus.com>
   4  * Public domain.
   5  */
   6
   7 #include <machine/asm.h>
   8
   9 RCSID("$NetBSD: $")
  10
  11 ENTRY(__significandl)
  12         fldt    4(%esp)
  13         fxtract
  14         fstp    %st(0)
  15         ret
  16 END (__significandl)
  17 weak_alias (__significandl, significandl)