Mercurial > hg > octave-nkf

diff src/sysdep.cc @ 1384:083787534e18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-09-13 08:25:37 by jwe]
author jwe
date Wed, 13 Sep 1995 08:32:00 +0000
parents ed5757e3333b
children f18474c64e72
line wrap: on
line diff
--- a/src/sysdep.cc
+++ b/src/sysdep.cc
@@ -178,6 +178,10 @@
     }
 #endif
 
+#endif
+
+#if defined (HAVE_ISNAN)
+
 #if defined (HAVE_QUIET_NAN)
   octave_NaN = (double) quiet_nan ();
 #elif defined (linux)
@@ -189,14 +193,6 @@
   octave_NaN = octave_Inf / octave_Inf;
 #endif
 
-#else
-
-  // This is sort of cheesy, but what can we do, other than blowing it
-  // off completely, or writing an entire IEEE emulation package?
-
-  octave_Inf = DBL_MAX;
-  octave_NaN = DBL_MAX;
-
 #endif
 
   float_params fp[5];