Mercurial > hg > octave-avbm
changeset 8114:cbbea37b95e8
debug.cc (Fisdebugmode): New function.
author | Krzesimir Nowak <qdlacz@gmail.com> |
---|---|
date | Thu, 18 Sep 2008 10:42:26 -0400 |
parents | 38a797766a2a |
children | 37c1bdb9805c |
files | doc/interpreter/contributors.in src/ChangeLog src/debug.cc |
diffstat | 3 files changed, 21 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/doc/interpreter/contributors.in +++ b/doc/interpreter/contributors.in @@ -135,6 +135,7 @@ Rick Niles Takuji Nishimura Eric Norum +Krzesimir Nowak Michael O'Brien Thorsten Ohl Arno Onken
--- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2008-09-17 Krzesimir Nowak <qdlacz@gmail.com> + + * debug.cc (Fisdebugmode): New function. + 2008-09-17 David Bateman <dbateman@free.fr> * data.cc (do_cat): Chopping trailing singleton dimensions.
--- a/src/debug.cc +++ b/src/debug.cc @@ -994,6 +994,22 @@ return octave_value_list (); } +DEFCMD (isdebugmode, args, , + "-*- texinfo -*-\n\ +@deftypefn {Command} {} isdebugmode ()\n\ +Return true if debug mode is on, otherwise false.\n\ +@seealso{dbstack, dbclear, dbstop, dbstatus}\n\ +@end deftypefn") +{ + octave_value retval; + + if (args.length() == 0) + retval = Vdebugging; + else + print_usage (); + + return retval; +} /* ;;; Local Variables: ***