# HG changeset patch
# User jwe
# Date 1077550500 0
# Node ID 962457f25a6df5ef3da5d3b76c3cdd42d0ca3d3b
# Parent  0bae5ef79e66f4d6ede4e6196146648abaae3b68
[project @ 2004-02-23 15:35:00 by jwe]

diff -r 0bae5ef79e66 -r 962457f25a6d liboctave/Array.cc
--- a/liboctave/Array.cc	Fri Feb 01 20:56:56 2008 -0500
+++ b/liboctave/Array.cc	Mon Feb 23 15:35:00 2004 +0000
@@ -891,11 +891,13 @@
 
   dim_vector dv_old = dimensions;
 
-  if (n > dv_old.length ())
+  int dv_old_orig_len = dv_old.length ();
+
+  if (n > dv_old_orig_len)
     {
       dv_old.resize (n);
 
-      for (int i = dv_old.length (); i < n; i++)
+      for (int i = dv_old_orig_len; i < n; i++)
 	dv_old.elem (i) = 1;
     }
 
@@ -2967,7 +2969,9 @@
 		final_lhs_dims = new_dims;
 
 	      lhs.resize_and_fill (new_dims, rfv);
+
 	      lhs_dims = lhs.dims ();
+
 	      lhs_dims_len = lhs_dims.length ();
 
 	      frozen_len = freeze (idx, lhs_dims, true);
diff -r 0bae5ef79e66 -r 962457f25a6d liboctave/ChangeLog
--- a/liboctave/ChangeLog	Fri Feb 01 20:56:56 2008 -0500
+++ b/liboctave/ChangeLog	Mon Feb 23 15:35:00 2004 +0000
@@ -1,3 +1,8 @@
+2004-02-23  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* Array.cc (Array<T>::resize_and_fill (const dim_vector&, const T&)): 
+	Fix thinko in extending dimensions.
+
 2004-02-20  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* Range.cc (Range::matrix_value, Range::min, Range::max):