Mercurial > octave
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);