Mercurial > hg > octave-lyh

diff src/ov.cc @ 5001:6690d8cd9bee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-09-16 00:31:42 by jwe]
author jwe
date Thu, 16 Sep 2004 00:31:43 +0000
parents d117a9fb83be
children 7929486ef2ed
line wrap: on
line diff
--- a/src/ov.cc
+++ b/src/ov.cc
@@ -926,7 +926,15 @@
       // a specific function to call to handle the op= operation for
       // the types we have.
 
-      octave_value t = subsref (type, idx);
+      octave_value t;
+      if (is_constant ())
+	t = subsref (type, idx);
+      else
+	{
+	  octave_value_list tl = subsref (type, idx, 1);
+	  if (tl.length () > 0)
+	    t = tl(0);
+	}
 
       if (! error_state)
 	{