Mercurial > hg > octave-nkf

diff src/pr-output.cc @ 5389:25c8956d2204

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-06-15 03:45:46 by jwe]
author jwe
date Wed, 15 Jun 2005 03:45:49 +0000
parents 7099eb9841b4
children b91241999ba6
line wrap: on
line diff
--- a/src/pr-output.cc
+++ b/src/pr-output.cc
@@ -259,7 +259,7 @@
     for (octave_idx_type i = 0; i < nr; i++)
       {
 	double val = m(i,j);
-	if (xisinf (val) || octave_is_NaN_or_NA (val))
+	if (xisinf (val) || xisnan (val))
 	  continue;
 
 	if (val < result)
@@ -370,7 +370,7 @@
 
   bool sign = (d < 0.0);
 
-  bool inf_or_nan = (xisinf (d) || octave_is_NaN_or_NA (d));
+  bool inf_or_nan = (xisinf (d) || xisnan (d));
 
   bool int_only = (! inf_or_nan && D_NINT (d) == d);
 
@@ -2959,7 +2959,7 @@
 {
   double val;
   if (builtin_real_scalar_variable ("output_max_field_width", val)
-      && ! octave_is_NaN_or_NA (val))
+      && ! xisnan (val))
     {
       int ival = NINT (val);
       if (ival > 0 && ival == val)
@@ -2977,7 +2977,7 @@
 {
   double val;
   if (builtin_real_scalar_variable ("output_precision", val)
-      && ! octave_is_NaN_or_NA (val))
+      && ! xisnan (val))
     {
       int ival = NINT (val);
       if (ival >= 0 && ival == val)