Mercurial > hg > octave-nkf

diff src/pr-output.cc @ 12029:ee264f77eaed release-3-2-x

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix 'format rat' for values like '1 - eps'
author David Bateman <dbateman@free.fr>
date Thu, 02 Jul 2009 06:31:29 +0200
parents 9681984e898d
children bd994ce20158
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.)