1 /*
2 Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
3 
4 Developed at SunPro, a Sun Microsystems, Inc. business.
5 Permission to use, copy, modify, and distribute this
6 software is freely granted, provided that this notice
7 is preserved.
8  */
9 /*
10  * nanf () returns a nan.
11  * Added by Cygnus Support.
12  */
13 
14 #include "fdlibm.h"
15 
nanf(const char * unused)16 	float nanf(const char *unused)
17 {
18 	float x;
19 
20         (void) unused;
21 #if __GNUC_PREREQ (3, 3)
22 	x = __builtin_nanf("");
23 #else
24 	SET_FLOAT_WORD(x,0x7fc00000);
25 #endif
26 	return x;
27 }
28 
29 _MATH_ALIAS_f_s(nan)
30