Mercurial > hg > octave-lyh

diff src/ov-struct.cc @ 4499:55695bf73797

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-09-05 19:56:37 by jwe]
author jwe
date Fri, 05 Sep 2003 19:56:37 +0000
parents 83d4452bc522
children 508238e65af7
line wrap: on
line diff
--- a/src/ov-struct.cc
+++ b/src/ov-struct.cc
@@ -115,7 +115,7 @@
 		    idx_vector i = t_idx(0).index_vector ();
 		    octave_value_list t = tmp.index (i);
 
-		    retval = (t.length () == 1) ? t(0) : octave_value (t);
+		    retval = (t.length () == 1) ? t(0) : octave_value (t, true);
 
 		    // We handled two index elements, so tell
 		    // next_subsref to skip both of them.
@@ -145,7 +145,7 @@
       {
 	octave_value_list t = dotref (idx.front ());
 
-	retval = (t.length () == 1) ? t(0) : octave_value (t);
+	retval = (t.length () == 1) ? t(0) : octave_value (t, true);
       }
       break;
 
@@ -422,7 +422,7 @@
 	  std::string key = map.key (p);
 	  octave_value_list val = map.contents (p);
 
-	  octave_value tmp = (n == 1) ? val(0) : octave_value (val);
+	  octave_value tmp = (n == 1) ? val(0) : octave_value (val, true);
 
 	  if (print_keys_only)
 	    {