sysdeps/i386/fpu/s_atan.S

   1 /*
   2  * Public domain.
   3  */
   4
   5 #include <machine/asm.h>
   6 #include <i386-math-asm.h>
   7 #include <libm-alias-double.h>
   8
   9 RCSID("$NetBSD: s_atan.S,v 1.4 1995/05/08 23:50:41 jtc Exp $")
  10
  11 DEFINE_DBL_MIN
  12
  13 #ifdef PIC
  14 # define MO(op) op##@GOTOFF(%ecx)
  15 #else
  16 # define MO(op) op
  17 #endif
  18
  19         .text
  20 ENTRY(__atan)
  21 #ifdef  PIC
  22         LOAD_PIC_REG (cx)
  23 #endif
  24         fldl    4(%esp)
  25         fld1
  26         fpatan
  27         DBL_CHECK_FORCE_UFLOW
  28         ret
  29 END (__atan)
  30 libm_alias_double (__atan, atan)