kolibrios/programs/develop/libraries/newlib/math/sqrtf.c
Sergey Semyonov (Serge) 2336060a0c newlib: update
git-svn-id: svn://kolibrios.org@1906 a494cfbc-eb01-0410-851d-a64ba20cac60
2011-03-11 18:52:24 +00:00

38 lines
493 B
C

#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;
}
}