diff src/ov-base.cc @ 7761:5adeea5de26c

symbol table reporting functions
author John W. Eaton <jwe@octave.org>
date Tue, 06 May 2008 05:51:17 -0400
parents 39930366b709
children 82be108cc558
line wrap: on
line diff
--- a/src/ov-base.cc	Tue May 06 03:23:12 2008 -0400
+++ b/src/ov-base.cc	Tue May 06 05:51:17 2008 -0400
@@ -771,6 +771,17 @@
   return retval;
 }
 
+const octave_function *
+octave_base_value::function_value (bool silent) const
+{
+  const octave_function *retval = 0;
+
+  if (! silent)
+    gripe_wrong_type_arg ("octave_base_value::function_value()",
+			  type_name ());
+  return retval;
+}
+
 octave_user_function *
 octave_base_value::user_function_value (bool silent)
 {
@@ -1011,6 +1022,16 @@
   gripe_wrong_type_arg ("octave_base_value::unlock ()", type_name ());
 }
 
+void
+octave_base_value::dump (std::ostream& os) const
+{
+  dim_vector dv = this->dims ();
+
+  os << "class: " << this->class_name ()
+     << " type: " << this->type_name ()
+     << " dims: " << dv.str ();
+}
+
 static void
 gripe_indexed_assignment (const std::string& tn1, const std::string& tn2)
 {