branch: externals/realgud commit 2987c80daa309fdb73f32b210f088f8e8a9086a8 Author: rocky <ro...@gnu.org> Commit: rocky <ro...@gnu.org>
Compile linting --- realgud/common/file.el | 7 ++++++- realgud/common/track.el | 15 +++++++++++++-- realgud/debugger/bashdb/bashdb.el | 8 ++++++-- realgud/debugger/gdb/gdb.el | 8 +++++--- realgud/debugger/ipdb/track-mode.el | 1 + realgud/debugger/jdb/core.el | 3 ++- realgud/debugger/jdb/jdb.el | 4 ++++ realgud/debugger/trepan2/core.el | 3 ++- 8 files changed, 39 insertions(+), 10 deletions(-) diff --git a/realgud/common/file.el b/realgud/common/file.el index ca63482..45fbce2 100644 --- a/realgud/common/file.el +++ b/realgud/common/file.el @@ -1,4 +1,4 @@ -;; Copyright (C) 2010-2011, 2013-2014, 2016-2018 Free Software Foundation, Inc +;; Copyright (C) 2010-2011, 2013-2014, 2016-2019 Free Software Foundation, Inc ;; Author: Rocky Bernstein <ro...@gnu.org> @@ -24,7 +24,12 @@ (declare-function realgud-get-cmdbuf 'realgud-buffer-helper) (declare-function buffer-killed? 'helper) (declare-function compilation-find-file 'compile) +(declare-function realgud-cmdbuf-info-ignore-re-file-list 'realgud-buffer-command) (declare-function realgud-cmdbuf-info-ignore-re-file-list= 'realgud-buffer-command) +(declare-function realgud-cmdbuf-mutex 'realgud-buffer-command) +(declare-function realgud-cmdbuf-filename-remap-alist 'realgud-buffer-command) +(declare-function realgud-cmdbuf-filename-remap-alist= 'realgud-buffer-command) +(declare-function realgud-cmdbuf-mutex 'realgud-buffer-command) (defcustom realgud-file-find-function 'realgud:find-file ;;(defcustom realgud-file-find-function 'compilation-find-file diff --git a/realgud/common/track.el b/realgud/common/track.el index ceaa20a..c36cf04 100644 --- a/realgud/common/track.el +++ b/realgud/common/track.el @@ -88,8 +88,19 @@ (make-variable-buffer-local (defvar realgud-track-mode)) (fn-p-to-fn?-alias 'realgud-loc-p) -(defvar realgud-track-divert-string) -(defvar starting-directory) +(defvar realgud-track-divert-string + "" + "Some commands need information from the debugger to perform certain actions, such as show what breapoints exist, give back trace information. The output of debugger commands which need to be captured, are stored in this buffer-local string variable.") + +(defvar starting-directory + nil + "When set this indicates the base directory that source code path should be based off of when the path is a relative path." + ) + + +(defvar realgud-command-name-hash + nil + "This buffer-local hash maps a debugger, like `gdb', or `pdb', to a hash table which describes how to implement generic debugger functions into the commands of that debugger. This information is set up by individual `init' function of the debugger. The keys at any given time will be those debuggers that have been used so far in the Emacs session.") (defun realgud-track-comint-output-filter-hook(text) "An output-filter hook custom for comint shells. Find diff --git a/realgud/debugger/bashdb/bashdb.el b/realgud/debugger/bashdb/bashdb.el index 9853b01..1d065b9 100644 --- a/realgud/debugger/bashdb/bashdb.el +++ b/realgud/debugger/bashdb/bashdb.el @@ -1,4 +1,4 @@ -;; Copyright (C) 2015-2016, 2018 Free Software Foundation, Inc +;; Copyright (C) 2015-2016, 2018-2019 Free Software Foundation, Inc ;; Author: Rocky Bernstein <ro...@gnu.org> @@ -17,7 +17,9 @@ ;; `bashdb' Main interface to bashdb via Emacs (require 'load-relative) -(require-relative-list '("../../common/helper") "realgud-") +(require-relative-list '("../../common/cmds" + "../../common/helper") + "realgud-") (require-relative-list '("../../common/run") "realgud:") (require-relative-list '("core" "track-mode") "realgud:bashdb-") @@ -28,6 +30,8 @@ :group 'realgud :version "24.3") +(declare-function realgud-command 'realgud:cmds) + ;; ------------------------------------------------------------------- ;; User-definable variables ;; diff --git a/realgud/debugger/gdb/gdb.el b/realgud/debugger/gdb/gdb.el index 4c2853f..c6a4d17 100644 --- a/realgud/debugger/gdb/gdb.el +++ b/realgud/debugger/gdb/gdb.el @@ -1,4 +1,4 @@ -;; Copyright (C) 2015-2016 Free Software Foundation, Inc +;; Copyright (C) 2015-2016, 2019 Free Software Foundation, Inc ;; Author: Rocky Bernstein <ro...@gnu.org> @@ -17,7 +17,9 @@ ;; `realgud:gdb' Main interface to gdb via Emacs (require 'load-relative) -(require-relative-list '("../../common/helper" "../../common/utils") +(require-relative-list '("../../common/cmds" + "../../common/helper" + "../../common/utils") "realgud-") (require-relative-list '("../../common/buffer/command" @@ -50,7 +52,7 @@ This should be an executable on your path, or an absolute file name." :group 'realgud:gdb) (declare-function realgud:gdb-track-mode 'realgud:gdb-track-mode) -(declare-function realgud-command 'realgud:gdb-core) +(declare-function realgud-command 'realgud:cmds) (declare-function realgud:gdb-parse-cmd-args 'realgud:gdb-core) (declare-function realgud:gdb-query-cmdline 'realgud:gdb-core) (declare-function realgud:run-process 'realgud-core) diff --git a/realgud/debugger/ipdb/track-mode.el b/realgud/debugger/ipdb/track-mode.el index 3620326..e33ce11 100644 --- a/realgud/debugger/ipdb/track-mode.el +++ b/realgud/debugger/ipdb/track-mode.el @@ -35,6 +35,7 @@ (declare-function realgud:track-set-debugger 'realgud-track-mode) (declare-function realgud-python-populate-command-keys 'realgud-lang-python) (declare-function realgud:ipdb-completion-at-point 'realgud:ipdb-core) +(declare-function realgud:remove-ansi-schmutz 'realgud:utils) (realgud-python-populate-command-keys ipdb-track-mode-map) diff --git a/realgud/debugger/jdb/core.el b/realgud/debugger/jdb/core.el index 44b1939..227a67b 100644 --- a/realgud/debugger/jdb/core.el +++ b/realgud/debugger/jdb/core.el @@ -1,4 +1,4 @@ -;; Copyright (C) 2014, 2016, 2018 Free Software Foundation, Inc +;; Copyright (C) 2014, 2016, 2018-2019 Free Software Foundation, Inc ;; Author: Rocky Bernstein <ro...@gnu.org> @@ -25,6 +25,7 @@ (declare-function realgud-query-cmdline 'realgud-core) (declare-function realgud-suggest-invocation 'realgud-core) (declare-function realgud:file-loc-from-line 'realgud-file) +(declare-function realgud:find-file 'realgud-file) ;; FIXME: I think the following could be generalized and moved to ;; realgud-... probably via a macro. diff --git a/realgud/debugger/jdb/jdb.el b/realgud/debugger/jdb/jdb.el index 047dd51..f0bef31 100644 --- a/realgud/debugger/jdb/jdb.el +++ b/realgud/debugger/jdb/jdb.el @@ -22,6 +22,10 @@ (declare-function realgud:run-process 'realgud:core) (declare-function realgud:flatten 'realgud-utils) +(defvar realgud:jdb-file-remap nil + "A buffer-local hash table to map a Java file reproted by jdb into a file seen in the filesystem." +) + ;; This is needed, or at least the docstring part of it is needed to ;; get the customization menu to work in Emacs 24. diff --git a/realgud/debugger/trepan2/core.el b/realgud/debugger/trepan2/core.el index 07c97b7..09b6ebc 100644 --- a/realgud/debugger/trepan2/core.el +++ b/realgud/debugger/trepan2/core.el @@ -1,4 +1,4 @@ -;; Copyright (C) 2010-2012, 2014-2016, 2018 Free Software Foundation, Inc +;; Copyright (C) 2010-2012, 2014-2016, 2018, 2019 Free Software Foundation, Inc ;; Author: Rocky Bernstein <ro...@gnu.org> @@ -29,6 +29,7 @@ (declare-function realgud-query-cmdline 'realgud-core) (declare-function realgud-suggest-invocation 'realgud-core) (declare-function realgud:file-loc-from-line 'realgud-file) +(declare-function realgud:find-file 'realgud-file) ;; FIXME: I think the following could be generalized and moved to ;; realgud-... probably via a macro.