Handle "NaN" and "Infinity" for input values.

I think NAN is already guaranteed to be there from Jan's work on NUMERIC,
 but perhaps HUGE_VAL needs some #ifndef's in the same place.
Should also include "-Infinity" as -HUGE_VAL sometime; not there yet.

diff --git a/src/backend/utils/adt/float.c b/src/backend/utils/adt/float.c
index a00cef1bf19c8277c130707007cd0cc53c98c408..ba6abbb247c545f5e261ed276450f4a3e3ccd5e6 100644 (file)
--- a/src/backend/utils/adt/float.c
+++ b/src/backend/utils/adt/float.c
@@ -7,7 +7,7 @@
  *
  *
  * IDENTIFICATION
- *   $Header: /cvsroot/pgsql/src/backend/utils/adt/float.c,v 1.35 1998/11/29 01:57:59 tgl Exp $
+ *   $Header: /cvsroot/pgsql/src/backend/utils/adt/float.c,v 1.36 1999/01/10 17:13:06 thomas Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -249,8 +249,17 @@ float8in(char *num)
 
    errno = 0;
    val = strtod(num, &endptr);
-   if (*endptr != '\0' || errno == ERANGE)
-       elog(ERROR, "Bad float8 input format '%s'", num);
+   if (*endptr != '\0')
+   {
+       if (strcasecmp(num, "NaN") == 0)
+           val = NAN;
+       else if (strcasecmp(num, "Infinity") == 0)
+           val = HUGE_VAL;
+       else if (errno == ERANGE)
+           elog(ERROR, "Input '%s' is out of range for float8", num);
+       else
+           elog(ERROR, "Bad float8 input format '%s'", num);
+   }
 
    CheckFloat8Val(val);
    *result = val;