Mercurial > hg > octave-lyh

diff src/pt-assign.cc @ 5265:86185152b7a4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-04-05 13:28:49 by jwe]
author jwe
date Tue, 05 Apr 2005 13:28:49 +0000
parents e35b034d3523
children 4c8a2e4e0717
line wrap: on
line diff
--- a/src/pt-assign.cc
+++ b/src/pt-assign.cc
@@ -224,6 +224,18 @@
 
 	  int n = rhs_val.length ();
 
+	  if (n == 1)
+	    {
+	      octave_value tmp = rhs_val(0);
+
+	      if (tmp.is_cs_list ())
+		{
+		  rhs_val = tmp.list_value ();
+
+		  n = rhs_val.length ();
+		}
+	    }
+
 	  retval.resize (n, octave_value ());
 
 	  for (tree_argument_list::iterator p = lhs->begin ();