Mercurial > hg > octave-nkf
diff src/ov-list.cc @ 4233:ccfdb55c8156
[project @ 2002-12-20 22:43:54 by jwe]
author | jwe |
---|---|
date | Fri, 20 Dec 2002 22:43:55 +0000 |
parents | 23d06c9e1edd |
children | fc9a075d10fb |
line wrap: on
line diff
--- a/src/ov-list.cc +++ b/src/ov-list.cc @@ -58,7 +58,7 @@ { idx_vector i = tmp_idx (0).index_vector (); - retval = octave_value_list (lst.index (i)); + retval = octave_value (octave_value_list (lst.index (i))); } else error ("only one index allowed for lists"); @@ -106,7 +106,7 @@ { idx_vector i = idx (0).index_vector (); - retval = octave_value_list (lst.index (i, resize_ok)); + retval = octave_value (octave_value_list (lst.index (i, resize_ok))); } else error ("lists may only be indexed by a single scalar"); @@ -357,7 +357,7 @@ tmp.append (ov); } - retval = tmp; + retval = octave_value (tmp); } } else @@ -381,7 +381,7 @@ octave_value_list tmp = args(0).list_value (); if (! error_state) - retval = tmp.reverse (); + retval = octave_value (tmp.reverse ()); } else print_usage ("reverse"); @@ -441,7 +441,7 @@ } if (! error_state) - retval = list_1.splice (offset, length, list_2); + retval = octave_value (list_1.splice (offset, length, list_2)); } else error ("splice: OFFSET must be an integer");