Mercurial > hg > octave-lyh
diff src/pr-output.cc @ 9412:ddcc0da700b8
Fix 'format rat' for values like '1 - eps'
| author | David Bateman <dbateman@free.fr> |
|---|---|
| date | Wed, 01 Jul 2009 08:37:24 +0200 |
| parents | 610bf90fce2a |
| children | 6f42ea240b3a |
line wrap: on
line diff
--- a/src/pr-output.cc +++ b/src/pr-output.cc @@ -271,6 +271,15 @@ double step = xround (flip); double nextn = n; double nextd = d; + + // Have we converged to 1/intmax ? + if (m > 100 || fabs (frac) < 1 / static_cast<double>(INT_MAX)) + { + lastn = n; + lastd = d; + break; + } + frac = flip - step; n = n * step + lastn; d = d * step + lastd; @@ -295,14 +304,6 @@ break; s = buf.str(); - - // Have we converged to 1/intmax ? - if (m > 100 || fabs (frac) < 1 / static_cast<double>(INT_MAX)) - { - lastn = n; - lastd = d; - break; - } } if (lastd < 0.)