# HG changeset patch
# User David Bateman <dbateman@free.fr>
# Date 1205950377 14400
# Node ID 48488cca0006b4c8e7ee8e32bcef9fa27ccce135
# Parent  90c9038170bfee594e1ee8dcdcf0b2d633615c2d
Fix for array indexing if original matrix is empty

diff -r 90c9038170bf -r 48488cca0006 liboctave/Array.cc
--- a/liboctave/Array.cc	Wed Mar 19 13:11:50 2008 -0400
+++ b/liboctave/Array.cc	Wed Mar 19 14:12:57 2008 -0400
@@ -3283,7 +3283,7 @@
 
 		  if (nelem >= 1
 		      && ((k < rhs_dims.length () && nelem == rhs_dims(k))
-			  || rhs_is_scalar))
+			  || rhs_is_scalar) || ! idx(i).is_colon())
 		    k++;
 		  else if (! (nelem == 1 || rhs_is_scalar))
 		    {
diff -r 90c9038170bf -r 48488cca0006 liboctave/ChangeLog
--- a/liboctave/ChangeLog	Wed Mar 19 13:11:50 2008 -0400
+++ b/liboctave/ChangeLog	Wed Mar 19 14:12:57 2008 -0400
@@ -1,5 +1,8 @@
 2008-03-19  David Bateman  <dbateman@free.fr>
 
+	* Array.cc (assignN): If orig_empty allow assignment like
+	a(1:10,1)=1:10
+
 	* Sparse.h (template <class U, class F> Sparse<U> map (F fcn)
 	const): New template function.
 	* MSparse.h (template <class U, class F> MSparse<U> map (F fcn)