Mercurial > hg > octave-lyh

diff src/ov.cc @ 3351:8623649c967c
[project @ 1999-11-15 16:17:01 by jwe]
author: jwe
date: Mon, 15 Nov 1999 16:17:06 +0000
parents: 585a8809fd9b
children: 4f40efa995c1
--- a/src/ov.cc
+++ b/src/ov.cc
@@ -37,6 +37,7 @@
 #include "ov-base.h"
 #include "ov-bool.h"
 #include "ov-bool-mat.h"
+#include "ov-cell.h"
 #include "ov-scalar.h"
 #include "ov-re-mat.h"
 #include "ov-complex.h"
@@ -334,6 +335,13 @@
   rep->count = 1;
 }
 
+octave_value::octave_value (const Cell& c)
+  : rep (new octave_cell (c))
+{
+  rep->count = 1;
+  maybe_mutate ();
+}
+
 octave_value::octave_value (const Matrix& m)
   : rep (new octave_matrix (m))
 {
@@ -709,6 +717,12 @@
   return octave_lvalue ();
 }
 
+Cell
+octave_value::cell_value (void) const
+{
+  return rep->cell_value ();
+}
+
 Octave_map
 octave_value::map_value (void) const
 {