sysdeps/i386/fpu/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 /* I added the following ugly construct because ilogb(+-Inf) is
  14    required to return INT_MAX in ISO C99.
  15    -- jakub@redhat.com.  */
  16         fxam                    /* Is NaN or +-Inf?  */
  17         fstsw   %ax
  18         movb    $0x45, %dh
  19         andb    %ah, %dh
  20         cmpb    $0x05, %dh
  21         je      1f              /* Is +-Inf, jump.  */
  22
  23         fxtract
  24         pushl   %eax
  25         fstp    %st
  26
  27         fistpl  (%esp)
  28         fwait
  29         popl    %eax
  30
  31         ret
  32
  33 1:      fstp    %st
  34         movl    $0x7fffffff, %eax
  35         ret
  36 END (__ilogbl)
  37 weak_alias (__ilogbl, ilogbl)