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         cfi_adjust_cfa_offset (4)
  26         fstp    %st
  27
  28         fistpl  (%esp)
  29         fwait
  30         popl    %eax
  31         cfi_adjust_cfa_offset (-4)
  32
  33         ret
  34
  35 1:      fstp    %st
  36         movl    $0x7fffffff, %eax
  37         ret
  38 END (__ilogbl)
  39 weak_alias (__ilogbl, ilogbl)