summaryrefslogtreecommitdiff
path: root/libm/nan.c
diff options
context:
space:
mode:
Diffstat (limited to 'libm/nan.c')
-rw-r--r--libm/nan.c43
1 files changed, 25 insertions, 18 deletions
diff --git a/libm/nan.c b/libm/nan.c
index 8d7998896..16e5c1772 100644
--- a/libm/nan.c
+++ b/libm/nan.c
@@ -1,3 +1,10 @@
+/* vi: set sw=4 ts=4: */
+/*
+ * Copyright (C) 2002 by Erik Andersen <andersen@uclibc.org>
+ *
+ * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
+ */
+
/***********************************************************************
nan, nanf, nanl - return quiet NaN
@@ -17,32 +24,32 @@
double nan (const char *tagp)
{
- if (tagp[0] != '\0') {
- char buf[6 + strlen (tagp)];
- sprintf (buf, "NAN(%s)", tagp);
- return strtod (buf, NULL);
- }
- return NAN;
+ if (tagp[0] != '\0') {
+ char buf[6 + strlen (tagp)];
+ sprintf (buf, "NAN(%s)", tagp);
+ return strtod (buf, NULL);
+ }
+ return NAN;
}
float nanf (const char *tagp)
{
- if (tagp[0] != '\0') {
- char buf[6 + strlen (tagp)];
- sprintf (buf, "NAN(%s)", tagp);
- return strtof (buf, NULL);
- }
- return NAN;
+ if (tagp[0] != '\0') {
+ char buf[6 + strlen (tagp)];
+ sprintf (buf, "NAN(%s)", tagp);
+ return strtof (buf, NULL);
+ }
+ return NAN;
}
#if 0
long double nanl (const char *tagp)
{
- if (tagp[0] != '\0') {
- char buf[6 + strlen (tagp)];
- sprintf (buf, "NAN(%s)", tagp);
- return strtold (buf, NULL);
- }
- return NAN;
+ if (tagp[0] != '\0') {
+ char buf[6 + strlen (tagp)];
+ sprintf (buf, "NAN(%s)", tagp);
+ return strtold (buf, NULL);
+ }
+ return NAN;
}
#endif