Mercurial > hg > octave-nkf

diff liboctave/lo-ieee.h @ 4075:9a2102864eb0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-09-27 21:37:56 by jwe]
author jwe
date Fri, 27 Sep 2002 21:37:56 +0000
parents a67f76924703
children cbac6756967e
line wrap: on
line diff
--- a/liboctave/lo-ieee.h
+++ b/liboctave/lo-ieee.h
@@ -27,6 +27,18 @@
 extern "C" {
 #endif
 
+extern int lo_ieee_hw;
+extern int lo_ieee_lw;
+
+typedef union
+{
+  double value;
+  unsigned int word[2];
+} lo_ieee_double;
+
+#define LO_IEEE_NA_HW 0x7ff00000
+#define LO_IEEE_NA_LW 1954
+
 // Octave's idea of infinity.
 extern double octave_Inf;
 
@@ -38,9 +50,6 @@
 
 extern void octave_ieee_init (void);
 
-extern int lo_ieee_is_NA (double);
-extern int lo_ieee_is_NaN_or_NA (double);
-
 #if defined (SCO)
 extern int isnan (double);
 extern int isinf (double);
@@ -50,6 +59,9 @@
 extern int lo_ieee_finite (double x);
 extern int lo_ieee_isinf (double x);
 
+extern int lo_ieee_is_NA (double);
+extern int lo_ieee_is_NaN_or_NA (double);
+
 #ifdef	__cplusplus
 }
 #endif