diff src/pt-bp.cc @ 8831:71742f45571e

pt-bp.cc: call accept for function and script commands
author John W. Eaton <jwe@octave.org>
date Fri, 20 Feb 2009 14:11:04 -0500
parents 73c4516fae10
children eb63fbe60fab
line wrap: on
line diff
--- a/src/pt-bp.cc	Fri Feb 20 12:24:03 2009 -0500
+++ b/src/pt-bp.cc	Fri Feb 20 14:11:04 2009 -0500
@@ -160,15 +160,21 @@
 }
 
 void
-tree_breakpoint::visit_octave_user_script (octave_user_script&)
+tree_breakpoint::visit_octave_user_script (octave_user_script& fcn)
 {
-  panic_impossible ();
+  tree_statement_list *cmd_list = fcn.body ();
+
+  if (cmd_list)
+    cmd_list->accept (*this);
 }
 
 void
-tree_breakpoint::visit_octave_user_function (octave_user_function&)
+tree_breakpoint::visit_octave_user_function (octave_user_function& fcn)
 {
-  panic_impossible ();
+  tree_statement_list *cmd_list = fcn.body ();
+
+  if (cmd_list)
+    cmd_list->accept (*this);
 }
 
 void