diff src/ov-cell.cc @ 5846:db0598f94c0f

[project @ 2006-06-07 18:16:16 by jwe]
author jwe
date Wed, 07 Jun 2006 18:16:16 +0000
parents 22e23bee74c8
children 426b94346d70
line wrap: on
line diff
--- a/src/ov-cell.cc	Wed Jun 07 18:11:24 2006 +0000
+++ b/src/ov-cell.cc	Wed Jun 07 18:16:16 2006 +0000
@@ -222,7 +222,18 @@
 	  {
 	    octave_value_list i = idx.front ();
 
-	    octave_base_matrix<Cell>::assign (i, Cell (t_rhs));
+	    if (t_rhs.is_cs_list ())
+	      {
+		Cell tmp_cell = Cell (t_rhs.list_value ());
+
+		// FIXME -- shouldn't care if the dimensions of the
+		// RHS don't match the dimensions of the subscripted
+		// LHS.
+
+		octave_base_matrix<Cell>::assign (i, tmp_cell);
+	      }
+	    else
+	      octave_base_matrix<Cell>::assign (i, Cell (t_rhs));
 
 	    count++;
 	    retval = octave_value (this);