--- a/src/pt-const.cc	Sun Aug 07 01:02:15 1994 +0000
+++ b/src/pt-const.cc	Sun Aug 07 01:02:15 1994 +0000
@@ -29,6 +29,8 @@
 #pragma implementation
 #endif
 
+#include <iostream.h>
+
 #include "tree-const.h"
 #include "error.h"
 #include "gripes.h"
@@ -65,10 +67,9 @@
 }
 #endif
 
-/*
- * Construct return vector of empty matrices.  Return empty matrices
- * and/or gripe when appropriate.
- */
+// Construct return vector of empty matrices.  Return empty matrices
+// and/or gripe when appropriate.
+
 Octave_object
 vector_of_empties (int nargout, const char *fcn_name)
 {
@@ -93,6 +94,21 @@
   return retval;
 }
 
+void
+tree_constant::print_code (ostream& os)
+{
+  print_code_indent (os);
+
+  if (in_parens)
+    os << "(";
+
+  if (rep)
+    rep->print_code (os);
+
+  if (in_parens)
+    os << ")";
+}
+
 /*
 ;;; Local Variables: ***
 ;;; mode: C++ ***