--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2010-01-29  Ryan Rusaw  <rrusaw@gmail.com>
+
+	* pt-eval.h, pt-eval.cc (tree_evaluator::do_keyboard):
+	New virtual function.
+
 2010-01-28  Jaroslav Hajek  <highegg@gmail.com>
 
 	* toplev.cc (run_command_and_return_output): Fix testing of failed

--- a/src/pt-eval.cc
+++ b/src/pt-eval.cc
@@ -1155,6 +1155,17 @@
 
   if (break_on_this_statement)
     do_keyboard ();
+
+}
+
+// ARGS is currently unused, but since the do_keyboard function in
+// input.cc accepts an argument list, we preserve it here so that the
+// interface won't have to change if we decide to use it in the future.
+
+octave_value
+tree_evaluator::do_keyboard (const octave_value_list& args) const
+{
+  return ::do_keyboard (args);
 }
 
 DEFUN (silent_functions, args, nargout,

--- a/src/pt-eval.h
+++ b/src/pt-eval.h
@@ -163,6 +163,9 @@
   void do_breakpoint (bool is_breakpoint,
 		      bool is_end_of_fcn_or_script = false) const;
 
+  virtual octave_value
+  do_keyboard (const octave_value_list& args = octave_value_list ()) const;
+
   // No copying!
 
   tree_evaluator (const tree_evaluator&);