Mercurial > octave

changeset 1555:6935e817fd25

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-10-11 05:49:55 by jwe]
author jwe
date Wed, 11 Oct 1995 05:49:55 +0000
parents b1ba1894bccc
children d508e2cab748
files liboctave/Range.cc
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/Range.cc	Mon Oct 09 13:31:42 1995 +0000
+++ b/liboctave/Range.cc	Wed Oct 11 05:49:55 1995 +0000
@@ -194,7 +194,7 @@
   t1 = ct > t1 ? ct : t1;
   t1 = floor (x + t1);
 
-  if (x <= 0.0 || t1 - x < rmax)
+  if (x <= 0.0 || (t1 - x) < rmax)
     return t1;
   else
     return t1 - 1.0;
@@ -217,7 +217,7 @@
 {
   double ct = 3.0 * DBL_EPSILON;
 
-  double tmp = round ((rng_limit - rng_base + rng_inc) / rng_inc, ct);
+  double tmp = tfloor ((rng_limit - rng_base + rng_inc) / rng_inc, ct);
 
   int n_intervals = (int) (tmp > 0.0 ? tmp : 0);