newlib/libm/machine/spu/headers/acos.h

   1 #include "headers/acosd2.h"
   2 #include "headers/dom_chkd_negone_one.h"
   3
   4 static __inline double _acos(double x)
   5 {
   6   double res;
   7   vector double vx;
   8
   9   vx = spu_splats(x);
  10   res = spu_extract(_acosd2(vx), 0);
  11 #ifndef _IEEE_LIBM
  12   /*
  13    * Domain error if not in the interval [-1, +1]
  14    */
  15   dom_chkd_negone_one(vx);
  16 #endif
  17   return res;
  18 }