# HG changeset patch
# User jwe
# Date 1059573045 0
# Node ID f62a7ed4fb064062e4b1dc7295c19df58c76a89a
# Parent  32ac2bea0185217fc98e2d2bd943dcf292fde326
[project @ 2003-07-30 13:48:51 by jwe]

diff -r 32ac2bea0185 -r f62a7ed4fb06 liboctave/ArrayN.cc
--- a/liboctave/ArrayN.cc	Tue Jul 29 23:05:32 2003 +0000
+++ b/liboctave/ArrayN.cc	Wed Jul 30 13:50:45 2003 +0000
@@ -181,21 +181,22 @@
 }
 
 static inline void
-increment_index (Array<int>& ra_idx, const Array<int>& dimensions)
+increment_index (Array<int>& ra_idx, const Array<int>& dimensions,
+		 int start_dimension = 0)
 {
-  ra_idx(0)++;
+  ra_idx(start_dimension)++;
 
   int n = ra_idx.length () - 1;
 
-  for (int i = 0; i < n; i++)
+  for (int i = start_dimension; i < n; i++)
     {
       if (ra_idx(i) < dimensions(i))
-	break;
+ 	break;
       else
-	{
-	  ra_idx(i) = 0;
-	  ra_idx(i+1)++;
-	}
+ 	{
+ 	  ra_idx(i) = 0;
+ 	  ra_idx(i+1)++;
+ 	}
     }
 }
 
diff -r 32ac2bea0185 -r f62a7ed4fb06 liboctave/ChangeLog
--- a/liboctave/ChangeLog	Tue Jul 29 23:05:32 2003 +0000
+++ b/liboctave/ChangeLog	Wed Jul 30 13:50:45 2003 +0000
@@ -1,7 +1,10 @@
+2003-07-30  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* ArrayN.cc (increment_index): New arg, start_dimension.
+
 2003-07-29  Heine Kolltveit <kolltvei@idi.ntnu.no>
 
 	* ArrayN.cc (operator <<): Improve output readability.
-	(increment_index (Array<int>&, Array<int>&, int)) New function.
 
 2003-07-29  Petter Risholm	<risholm@stud.ntnu.no>