sysdeps/libm-i387/s_nearbyintf.S

   1 /*
   2  * Written by J.T. Conklin <jtc@netbsd.org>.
   3  * Public domain.
   4  */
   5 /* Adapted for use as nearbyint by Ulrich Drepper <drepper@cygnus.com>.  */
   6
   7 #include <machine/asm.h>
   8
   9 ENTRY(__nearbyintf)
  10         flds    4(%esp)
  11         pushl   %eax
  12         pushl   %ecx
  13         fnstcw  (%esp)
  14         movl    (%esp), %eax
  15         andl    $~0x20, %eax
  16         movl    %eax, 4(%esp)
  17         fldcw   4(%esp)
  18         frndint
  19         fclex
  20         fldcw   (%esp)
  21         ret
  22 END (__nearbyintf)
  23 weak_alias (__nearbyintf, nearbyintf)