diff liboctave/lo-cieee.c @ 4102:cbac6756967e

[project @ 2002-10-14 20:16:44 by jwe]
author jwe
date Mon, 14 Oct 2002 20:16:45 +0000
parents 9a2102864eb0
children 53ee020af847
line wrap: on
line diff
--- a/liboctave/lo-cieee.c
+++ b/liboctave/lo-cieee.c
@@ -52,6 +52,18 @@
 #define finite(x) ((x) < DBL_MAX && (x) > -DBL_MAX)
 #endif
 
+/* Octave's idea of infinity.  */
+double octave_Inf;
+
+/* Octave's idea of a missing value.  */
+double octave_NA;
+
+/* Octave's idea of not a number.  */
+double octave_NaN;
+
+int lo_ieee_hw;
+int lo_ieee_lw;
+
 #if defined (SCO)
 
 int
@@ -116,6 +128,24 @@
   return lo_ieee_isnan (x);
 }
 
+double
+lo_ieee_inf_value (void)
+{
+  return octave_Inf;
+}
+
+double
+lo_ieee_na_value (void)
+{
+  return octave_NA;
+}
+
+double
+lo_ieee_nan_value (void)
+{
+  return octave_NaN;
+}
+
 /*
 ;;; Local Variables: ***
 ;;; mode: C++ ***