diff src/pt-pr-code.cc @ 2372:b21b42c25350

[project @ 1996-10-12 00:15:08 by jwe]
author jwe
date Sat, 12 Oct 1996 00:15:08 +0000
parents 6abec42e52f6
children 4516c3b75851
line wrap: on
line diff
--- a/src/pt-pr-code.cc
+++ b/src/pt-pr-code.cc
@@ -560,7 +560,7 @@
 }
 
 void
-tree_print_code::visit_octave_value (octave_value& val)
+tree_print_code::visit_constant (tree_constant& val)
 {
   indent ();
 
@@ -1034,24 +1034,19 @@
 
   tree_expression *op = expr.operand ();
 
-  tree_expression::type etype = expr.expression_type ();
+  if (expr.is_prefix_op ())
+    {
+      os << expr.oper ();
 
-  switch (etype)
-    {
-    case tree_expression::hermitian:
-    case tree_expression::transpose:
       if (op)
 	op->accept (*this);
-	os << expr.oper ();
-      break;
-
-    case tree_expression::not:
-    case tree_expression::uminus:
-    default:
-      os << expr.oper ();
+    }
+  else
+    {
       if (op)
 	op->accept (*this);
-      break;
+
+      os << expr.oper ();
     }
 
   if (in_parens)