upload sdk

git-svn-id: svn://kolibrios.org@4349 a494cfbc-eb01-0410-851d-a64ba20cac60

contrib/sdk/sources/newlib/math/s_nan.c

@@ -0,0 +1,48 @@
+/*
+ * nan () returns a nan.
+ * Added by Cygnus Support.
+ */
+
+/*
+FUNCTION
+	<<nan>>, <<nanf>>---representation of ``Not a Number''
+
+INDEX
+	nan
+INDEX
+	nanf
+
+ANSI_SYNOPSIS
+	#include <math.h>
+	double nan(const char *);
+	float nanf(const char *);
+
+TRAD_SYNOPSIS
+	#include <math.h>
+	double nan();
+	float nanf();
+
+
+DESCRIPTION
+	<<nan>> and <<nanf>> return an IEEE NaN (Not a Number) in
+	double- and single-precision arithmetic respectively.  The
+	argument is currently disregarded.
+
+QUICKREF
+	nan - pure
+
+*/
+
+#include "fdlibm.h"
+
+#ifndef _DOUBLE_IS_32BITS
+
+	double nan(const char *unused)
+{
+	double x;
+
+	INSERT_WORDS(x,0x7ff80000,0);
+	return x;
+}
+
+#endif /* _DOUBLE_IS_32BITS */