X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lib%2Fsqrtl.c;h=6795d667d91ff5b63a38c5f9f70b2dbfa06a2b5f;hb=9c19e102abfbf90cb5286c01441fec9f0b37b348;hp=299e70db6046c7bdc33852f4463c81d29d63e2e2;hpb=d60f3b0c6b0f93a601acd1cfd3923f94ca05abb0;p=gnulib.git diff --git a/lib/sqrtl.c b/lib/sqrtl.c index 299e70db6..6795d667d 100644 --- a/lib/sqrtl.c +++ b/lib/sqrtl.c @@ -23,7 +23,17 @@ /* Specification. */ #include -#include +#if HAVE_SAME_LONG_DOUBLE_AS_DOUBLE + +long double +sqrtl (long double x) +{ + return sqrt (x); +} + +#else + +# include /* A simple Newton-Raphson method. */ long double @@ -57,3 +67,5 @@ sqrtl (long double x) return y; } + +#endif