Mercurial > octave

comparison src/pr-output.cc @ 9612:66970dd627f6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
further liboctave design improvements
author Jaroslav Hajek <highegg@gmail.com>
date Fri, 04 Sep 2009 11:22:53 +0200
parents 6f42ea240b3a
children e1345a9002e8
comparison
equal deleted inserted replaced
9611:6f42ea240b3a 9612:66970dd627f6
850 bool int_only = (D_NINT (rp) == rp && D_NINT (ip) == ip); 850 bool int_only = (D_NINT (rp) == rp && D_NINT (ip) == ip);
851 851
852 double r_abs = rp < 0.0 ? -rp : rp; 852 double r_abs = rp < 0.0 ? -rp : rp;
853 double i_abs = ip < 0.0 ? -ip : ip; 853 double i_abs = ip < 0.0 ? -ip : ip;
854 854
855 int r_x = (xisinf (rp) || xisnan (rp) || xr_abs == 0.0) 855 int r_x = (xisinf (rp) || xisnan (rp) || r_abs == 0.0)
856 ? 0 : static_cast<int> (floor (log10 (r_abs) + 1.0)); 856 ? 0 : static_cast<int> (floor (log10 (r_abs) + 1.0));
857 857
858 int i_x = (xisinf (ip) || xisnan (ip) || i_abs == 0.0) 858 int i_x = (xisinf (ip) || xisnan (ip) || i_abs == 0.0)
859 ? 0 : static_cast<int> (floor (log10 (i_abs) + 1.0)); 859 ? 0 : static_cast<int> (floor (log10 (i_abs) + 1.0));
860 860