diff src/ov-cell.cc @ 5900:c20eb7330d13

[project @ 2006-07-22 08:31:16 by jwe]
author jwe
date Sat, 22 Jul 2006 08:31:17 +0000
parents 426b94346d70
children 8dbf3f9f22dc
line wrap: on
line diff
--- a/src/ov-cell.cc	Wed Jul 19 23:00:22 2006 +0000
+++ b/src/ov-cell.cc	Sat Jul 22 08:31:17 2006 +0000
@@ -1167,6 +1167,23 @@
   return retval;
 }
 
+mxArray *
+octave_cell::as_mxArray (void) const
+{
+  mxArray *retval = new mxArray (dims ());
+
+  mxArray **elts = static_cast<mxArray **> (retval->get_data ());
+
+  int nel = numel ();
+
+  const octave_value *p = matrix.data ();
+
+  for (int i = 0; i < nel; i++)
+    elts[i] = new mxArray (p[i]);
+
+  return retval;
+}
+
 /*
 ;;; Local Variables: ***
 ;;; mode: C++ ***