sysdeps/libm-i387/s_ilogbl.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(__ilogbl)
  12         fldt    4(%esp)
  13         fxtract
  14         pushl   %eax
  15         fstp    %st
  16
  17         fistpl  (%esp)
  18         fwait
  19         popl    %eax
  20
  21         ret
  22 END (__ilogbl)
  23 weak_alias (__ilogbl, ilogbl)