newlib-cygwin/newlib/libm/common/sf_nan.c

/*
 * nanf () returns a nan.
 * Added by Cygnus Support.
 */

#include "fdlibm.h"

	float nanf(const char *unused)
{
	float x;

	SET_FLOAT_WORD(x,0x7fc00000);
	return x;
}

#ifdef _DOUBLE_IS_32BITS

	double nan(const char *arg)
{
	return (double) nanf(arg);
}

#endif /* defined(_DOUBLE_IS_32BITS) */
import newlib-2000-02-17 snapshot 2000-02-17 19:39:52 +00:00			`/*`
			`* nanf () returns a nan.`
			`* Added by Cygnus Support.`
			`*/`

			`#include "fdlibm.h"`

* libc/include/math.h (nan, nanf): Update prototype to C99. * libm/common/s_nan.c (nan): Likewise. * libm/common/s_nanf.c (nanf, nan): Likewise. * libc/sys/linux/cmath/math_private.h (nan, nanf): Likewise. 2003-07-09 17:52:31 +00:00			`float nanf(const char *unused)`
import newlib-2000-02-17 snapshot 2000-02-17 19:39:52 +00:00			`{`
			`float x;`

			`SET_FLOAT_WORD(x,0x7fc00000);`
			`return x;`
			`}`

			`#ifdef _DOUBLE_IS_32BITS`

* libc/include/math.h (nan, nanf): Update prototype to C99. * libm/common/s_nan.c (nan): Likewise. * libm/common/s_nanf.c (nanf, nan): Likewise. * libc/sys/linux/cmath/math_private.h (nan, nanf): Likewise. 2003-07-09 17:52:31 +00:00			`double nan(const char *arg)`
import newlib-2000-02-17 snapshot 2000-02-17 19:39:52 +00:00			`{`
* libc/include/math.h (nan, nanf): Update prototype to C99. * libm/common/s_nan.c (nan): Likewise. * libm/common/s_nanf.c (nanf, nan): Likewise. * libc/sys/linux/cmath/math_private.h (nan, nanf): Likewise. 2003-07-09 17:52:31 +00:00			`return (double) nanf(arg);`
import newlib-2000-02-17 snapshot 2000-02-17 19:39:52 +00:00			`}`

			`#endif /* defined(_DOUBLE_IS_32BITS) */`
* libc/include/machine/ieeefp.h: Comment about new configuration macros _FLT_LARGEST_EXPONENT_IS_NORMAL and _FLT_NO_DENORMALS. * libm/common/fdlib.h: Define new macros for testing floats. * libm/common/sf_: Use them. libm/math/ef_: Likewise. libm/math/sf_*: Likewise. 2001-04-04 13:33:01 +00:00