Import Upstream version 2.72.4
This commit is contained in:
commit
4ef3ff9793
2003 changed files with 1332420 additions and 0 deletions
21
glib/gnulib/frexpl.c
Normal file
21
glib/gnulib/frexpl.c
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
#include <config.h>
|
||||
#include <gnulib_math.h>
|
||||
#include <float.h>
|
||||
#include <math.h>
|
||||
|
||||
long double rpl_frexpl (long double x, int *expptr)
|
||||
{
|
||||
if (x == 0.0L || x == -0.0L)
|
||||
{
|
||||
*expptr = x;
|
||||
return x;
|
||||
}
|
||||
else if (isnanl (x))
|
||||
return x;
|
||||
else if (isinf (x))
|
||||
return x;
|
||||
#ifndef _MSC_VER
|
||||
#undef frexpl
|
||||
#endif
|
||||
return frexpl (x, expptr);
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue