kolibrios-fun/programs/develop/libraries/newlib/math/sqrtf.c

38 lines
493 B
C
Raw Normal View History

#include <math.h>
#include <errno.h>
extern float __QNANF;
float
sqrtf (float x)
{
if (x < 0.0F )
{
errno = EDOM;
return __QNANF;
}
else
{
float res;
asm ("fsqrt" : "=t" (res) : "0" (x));
return res;
}
}
double
sqrt (double x)
{
if (x < 0.0F )
{
errno = EDOM;
return __QNANF;
}
else
{
double res;
asm ("fsqrt" : "=t" (res) : "0" (x));
return res;
}
}