Mercurial > hg > octave-nkf

diff src/ov-struct.cc @ 6833:e8a18d380097

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-08-27 17:22:50 by jwe]
author jwe
date Mon, 27 Aug 2007 17:22:51 +0000
parents 3fe394f8502b
children 10c7a803b409
line wrap: on
line diff
--- a/src/ov-struct.cc
+++ b/src/ov-struct.cc
@@ -363,7 +363,18 @@
 
 	    std::string key = key_idx(0).string_value ();
 
-	    map.assign (key, t_rhs);
+	    if (t_rhs.is_cs_list ())
+	      {
+		Cell tmp_cell = Cell (t_rhs.list_value ());
+
+		// FIXME -- shouldn't care if the dimensions of the
+		// RHS don't match the dimensions of the subscriped
+		// LHS.
+
+		map.assign (key, tmp_cell);
+	      }
+	    else
+	      map.assign (key, t_rhs);
 
 	    if (! error_state)
 	      {