lib/libc/arch/i386/gen/fpgetround.S

   1 /*      $NetBSD: fpgetround.S,v 1.5 2002/01/13 21:45:43 thorpej Exp $   */
   2
   3 /*
   4  * Written by J.T. Conklin, Apr 4, 1995
   5  * Public domain.
   6  */
   7
   8 #include <machine/asm.h>
   9
  10 #ifdef WEAK_ALIAS
  11 WEAK_ALIAS(fpgetround, _fpgetround)
  12 ENTRY(_fpgetround)
  13 #else
  14 ENTRY(fpgetround)
  15 #endif
  16         subl $4,%esp
  17         fnstcw (%esp)
  18         movl (%esp),%eax
  19         rorl $10,%eax
  20         andl $3,%eax
  21         addl $4,%esp
  22         ret