Mercurial > octave-nkf
changeset 4769:aef1e2d57055
[project @ 2004-02-16 16:15:24 by jwe]
| author | jwe |
|---|---|
| date | Mon, 16 Feb 2004 16:15:24 +0000 |
| parents | 22c4c2be4733 |
| children | ef5e598f099b |
| files | src/ChangeLog src/ov-list.cc |
| diffstat | 2 files changed, 11 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Mon Feb 16 15:23:22 2004 +0000 +++ b/src/ChangeLog Mon Feb 16 16:15:24 2004 +0000 @@ -1,3 +1,8 @@ +2004-02-16 John W. Eaton <jwe@bevo.che.wisc.edu> + + * ov-list.cc (octave_list::subsasgn): Call assign for Cell objects + here, not the base octave_value::assign. + 2004-02-15 John W. Eaton <jwe@bevo.che.wisc.edu> * lex.l (yywrap): Don't #undef this symbol.
--- a/src/ov-list.cc Mon Feb 16 15:23:22 2004 +0000 +++ b/src/ov-list.cc Mon Feb 16 16:15:24 2004 +0000 @@ -186,7 +186,12 @@ { octave_value_list i = idx.front (); - assign (i, t_rhs); + int len = i.length (); + + for (int k = 0; k < len; k++) + data.set_index (i(k).index_vector ()); + + ::assign (data, Cell (t_rhs), Cell::resize_fill_value ()); retval = octave_value (this, count + 1); }