sysdeps/i386/fpu/s_floor.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_floor.S,v 1.4 1995/05/09 00:01:59 jtc Exp $")
   9
  10 ENTRY(__floor)
  11         fldl    4(%esp)
  12         subl    $8,%esp
  13         cfi_adjust_cfa_offset (8)
  14
  15         fstcw   4(%esp)                 /* store fpu control word */
  16
  17         /* We use here %edx although only the low 1 bits are defined.
  18            But none of the operations should care and they are faster
  19            than the 16 bit operations.  */
  20         movl    $0x400,%edx             /* round towards -oo */
  21         orl     4(%esp),%edx
  22         andl    $0xf7ff,%edx
  23         movl    %edx,(%esp)
  24         fldcw   (%esp)                  /* load modified control word */
  25
  26         frndint                         /* round */
  27
  28         fldcw   4(%esp)                 /* restore original control word */
  29
  30         addl    $8,%esp
  31         cfi_adjust_cfa_offset (-8)
  32         ret
  33 END (__floor)
  34 weak_alias (__floor, floor)