sysdeps/libm-i387/s_ilogb.S

   1 /*
   2  * Written by J.T. Conklin <jtc@netbsd.org>.
   3  * Public domain.
   4  */
   5
   6 #include <machine/asm.h>
   7
   8 RCSID("$NetBSD: s_ilogb.S,v 1.5 1995/10/12 15:53:09 jtc Exp $")
   9
  10 ENTRY(__ilogb)
  11         pushl   %ebp
  12         movl    %esp,%ebp
  13         subl    $4,%esp
  14
  15         fldl    8(%ebp)
  16         fxtract
  17         fstpl   %st
  18
  19         fistpl  -4(%ebp)
  20         movl    -4(%ebp),%eax
  21
  22         leave
  23         ret
  24 END (__ilogb)
  25 weak_alias (__ilogb, ilogb)