Mercurial > octave

diff src/ov.cc @ 5147:47e4c91e5799

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-02-16 21:06:19 by jwe]
author jwe
date Wed, 16 Feb 2005 21:06:19 +0000
parents 275a95541831
children 57077d0ddc8e
line wrap: on
line diff
--- a/src/ov.cc	Wed Feb 16 19:18:32 2005 +0000
+++ b/src/ov.cc	Wed Feb 16 21:06:19 2005 +0000
@@ -423,6 +423,19 @@
   rep->count = 1;
 }
 
+octave_value::octave_value (const ArrayN<octave_value>& a, bool is_csl)
+  : rep (0)
+{
+  Cell c (a);
+
+  if (is_csl)
+    rep = new octave_cs_list (c);
+  else
+    rep = new octave_cell (c);
+
+  rep->count = 1;
+}
+
 octave_value::octave_value (const Matrix& m)
   : rep (new octave_matrix (m))
 {