diff src/pt-pr-code.cc @ 15035:a820a990968e classdef

new tree_funcall class * pt-funcall.h, pt-funcall.cc: New files. Define tree_funcall class. * pt-all.h: Also include pt-funcall.h. * pt-bp.h, pt-bp.cc (tree_breakpoint::visit_funcall): New function. * pt-check.h, pt-check.cc (tree_checker::visit_funcall): New function. * pt-eval.h, pt-eval.cc (tree_evaluator::visit_funcall): New function. * pt-pr-code.h, pt-pr-code.cc (tree_print_code::visit_funcall): New function. * pt-walk.h (tree_walker::visit_funcall): New pure virtual function. * src/Makefile.am (PT_INCLUDES): Add pt-funcall.h to the list.* (PT_SRC): Add pt-funcall.cc to the list.
author John W. Eaton <jwe@octave.org>
date Fri, 27 Jul 2012 15:44:11 -0400
parents 9e3983c8963c
children
line wrap: on
line diff
--- a/src/pt-pr-code.cc
+++ b/src/pt-pr-code.cc
@@ -749,6 +749,18 @@
 }
 
 void
+tree_print_code::visit_funcall (tree_funcall& fc)
+{
+  indent ();
+
+  print_parens (fc, "(");
+
+  fc.print_raw (os, true, print_original_text);
+
+  print_parens (fc, ")");
+}
+
+void
 tree_print_code::visit_parameter_list (tree_parameter_list& lst)
 {
   tree_parameter_list::iterator p = lst.begin ();