Retro68/gcc/newlib/libm/machine/spu/headers/sqrtf.h
Wolfgang Thaller d464252791 re-add newlib
2017-04-11 23:13:36 +02:00

17 lines
323 B
C

#include "headers/sqrtf4.h"
#include "headers/dom_chkf_less_than.h"
static __inline float _sqrtf(float in)
{
float res;
vector float vx;
vector float vc = { 0.0, 0.0, 0.0, 0.0 };
vx = spu_promote(in, 0);
res = spu_extract(_sqrtf4(vx), 0);
#ifndef _IEEE_LIBM
dom_chkf_less_than(vx, vc);
#endif
return res;
}