Mercurial > octave-nkf

diff src/ov-class.cc @ 9333:3930f8ce6430

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Unpack cs-list and setup nargin for call to subsasgn method
author Jaroslav Hajek <highegg@gmail.com>
date Thu, 11 Jun 2009 12:44:01 +0200
parents a76f391a3d02
children 610bf90fce2a
line wrap: on
line diff
--- a/src/ov-class.cc	Thu Jun 11 12:37:04 2009 +0200
+++ b/src/ov-class.cc	Thu Jun 11 12:44:01 2009 +0200
@@ -513,7 +513,15 @@
 	{
 	  octave_value_list args;
 
-	  args(2) = rhs;
+          if (rhs.is_cs_list ())
+            {
+              octave_value_list lrhs = rhs.list_value ();
+              args.resize (2 + lrhs.length ());
+              for (octave_idx_type i = 0; i < lrhs.length (); i++)
+                args(2+i) = lrhs(i);
+            }
+          else
+            args(2) = rhs;
 
 	  args(1) = make_idx_args (type, idx, "subsasgn");