Mercurial > octave

changeset 25346:dd416c31761e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
access bp_table through interpreter where possible * debug.cc (Fdbstop, Fdbclear): Define with DEFMETHOD. (Fdbstop, Fdbclear, Fdbstatus): Access bp_table through interpreter object.
author John W. Eaton <jwe@octave.org>
date Thu, 03 May 2018 02:26:29 -0400
parents ce6f7a5cd68e
children af3319d86a5f
files libinterp/corefcn/debug.cc
diffstat 1 files changed, 7 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/libinterp/corefcn/debug.cc	Thu May 03 01:51:04 2018 -0400
+++ b/libinterp/corefcn/debug.cc	Thu May 03 02:26:29 2018 -0400
@@ -80,8 +80,8 @@
   return retval;
 }
 
-DEFUN (dbstop, args, ,
-       doc: /* -*- texinfo -*-
+DEFMETHOD (dbstop, interp, args, ,
+           doc: /* -*- texinfo -*-
 @deftypefn  {} {} dbstop @var{func}
 @deftypefnx {} {} dbstop @var{func} @var{line}
 @deftypefnx {} {} dbstop @var{func} @var{line1} @var{line2} @dots{}
@@ -176,7 +176,7 @@
   std::string condition = "";
   octave_value retval;
 
-  octave::bp_table& bptab = octave::__get_bp_table__ ("Fdbstop");
+  octave::bp_table& bptab = interp.get_bp_table ();
 
   if (args.length() >= 1 && ! args(0).isstruct ())
     {
@@ -252,8 +252,8 @@
   return retval;
 }
 
-DEFUN (dbclear, args, ,
-       doc: /* -*- texinfo -*-
+DEFMETHOD (dbclear, interp, args, ,
+           doc: /* -*- texinfo -*-
 @deftypefn  {} {} dbclear @var{func}
 @deftypefnx {} {} dbclear @var{func} @var{line}
 @deftypefnx {} {} dbclear @var{func} @var{line1} @var{line2} @dots{}
@@ -302,7 +302,7 @@
 
   int nargin = args.length ();
 
-  octave::bp_table& bptab = octave::__get_bp_table__ ("Fdbclear");
+  octave::bp_table& bptab = interp.get_bp_table ();
 
   bptab.parse_dbfunction_params ("dbclear", args, symbol_name, lines, dummy);
 
@@ -374,7 +374,7 @@
   octave::bp_table::fname_bp_map bp_list;
   std::string symbol_name;
 
-  octave::bp_table& bptab = octave::__get_bp_table__ ("Fdbstatus");
+  octave::bp_table& bptab = interp.get_bp_table ();
 
   if (nargin == 1)
     {