Mercurial > hg > octave-lyh

diff src/pr-output.cc @ 9611:6f42ea240b3a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
pr-output.cc (set_format (const Complex&, int&, int&)): avoid passing NaN or Inf to log10
author John W. Eaton <jwe@octave.org>
date Thu, 03 Sep 2009 17:28:58 -0400
parents ddcc0da700b8
children 66970dd627f6
line wrap: on
line diff
--- a/src/pr-output.cc
+++ b/src/pr-output.cc
@@ -852,10 +852,10 @@
   double r_abs = rp < 0.0 ? -rp : rp;
   double i_abs = ip < 0.0 ? -ip : ip;
 
-  int r_x = r_abs == 0.0
+  int r_x = (xisinf (rp) || xisnan (rp) || xr_abs == 0.0)
     ? 0 : static_cast<int> (floor (log10 (r_abs) + 1.0));
 
-  int i_x = i_abs == 0.0
+  int i_x = (xisinf (ip) || xisnan (ip) || i_abs == 0.0)
     ? 0 : static_cast<int> (floor (log10 (i_abs) + 1.0));
 
   int x_max, x_min;