aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2008-02-18 15:36:03 +0000
committerJuanma Barranquero2008-02-18 15:36:03 +0000
commitbb02b5ec14afc4899c69a106813afbd8029ef304 (patch)
tree6f5807eceffb7fb19721aa880f16f3fd77ba720f
parent96e048a2d9b745d4484522b8bdb00cc076d24da3 (diff)
downloademacs-bb02b5ec14afc4899c69a106813afbd8029ef304.tar.gz
emacs-bb02b5ec14afc4899c69a106813afbd8029ef304.zip
(gud-def, gud-last-speedbar-stackframe): Doc fixes.
(gud-symbol, gud-expansion-speedbar-buttons, gud-speedbar-buttons, gud-gdb-run-command-fetch-lines, gud-dbx-use-stopformat-p, gud-jdb-classpath, gud-jdb-find-source-using-classpath, jdb, gud-find-class, gdb-script-mode, gud-tooltip-event, gud-tooltip-tips): Fix typos in docstrings.
-rw-r--r--lisp/progmodes/gud.el60
1 files changed, 30 insertions, 30 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index f8daa99675e..8168d2019e4 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -93,7 +93,7 @@ Supported debuggers include gdb, sdb, dbx, xdb, perldb, pdb (Python) and jdb."
93 93
94(defun gud-symbol (sym &optional soft minor-mode) 94(defun gud-symbol (sym &optional soft minor-mode)
95 "Return the symbol used for SYM in MINOR-MODE. 95 "Return the symbol used for SYM in MINOR-MODE.
96MINOR-MODE defaults to `gud-minor-mode. 96MINOR-MODE defaults to `gud-minor-mode'.
97The symbol returned is `gud-<MINOR-MODE>-<SYM>'. 97The symbol returned is `gud-<MINOR-MODE>-<SYM>'.
98If SOFT is non-nil, returns nil if the symbol doesn't already exist." 98If SOFT is non-nil, returns nil if the symbol doesn't already exist."
99 (unless (or minor-mode gud-minor-mode) (error "Gud internal error")) 99 (unless (or minor-mode gud-minor-mode) (error "Gud internal error"))
@@ -346,14 +346,14 @@ Uses `gud-<MINOR-MODE>-directories' to find the source files."
346;; Of course you may use `gud-def' with any other debugger command, including 346;; Of course you may use `gud-def' with any other debugger command, including
347;; user defined ones. 347;; user defined ones.
348 348
349;; A macro call like (gud-def FUNC NAME KEY DOC) expands to a form 349;; A macro call like (gud-def FUNC CMD KEY DOC) expands to a form
350;; which defines FUNC to send the command NAME to the debugger, gives 350;; which defines FUNC to send the command CMD to the debugger, gives
351;; it the docstring DOC, and binds that function to KEY in the GUD 351;; it the docstring DOC, and binds that function to KEY in the GUD
352;; major mode. The function is also bound in the global keymap with the 352;; major mode. The function is also bound in the global keymap with the
353;; GUD prefix. 353;; GUD prefix.
354 354
355(defmacro gud-def (func cmd key &optional doc) 355(defmacro gud-def (func cmd key &optional doc)
356 "Define FUNC to be a command sending STR and bound to KEY, with 356 "Define FUNC to be a command sending CMD and bound to KEY, with
357optional doc string DOC. Certain %-escapes in the string arguments 357optional doc string DOC. Certain %-escapes in the string arguments
358are interpreted specially if present. These are: 358are interpreted specially if present. These are:
359 359
@@ -425,7 +425,7 @@ we're in the GUD buffer)."
425 425
426(defvar gud-last-speedbar-stackframe nil 426(defvar gud-last-speedbar-stackframe nil
427 "Description of the currently displayed GUD stack. 427 "Description of the currently displayed GUD stack.
428t means that there is no stack, and we are in display-file mode.") 428The value t means that there is no stack, and we are in display-file mode.")
429 429
430(defvar gud-speedbar-key-map nil 430(defvar gud-speedbar-key-map nil
431 "Keymap used when in the buffers display mode.") 431 "Keymap used when in the buffers display mode.")
@@ -487,14 +487,14 @@ t means that there is no stack, and we are in display-file mode.")
487 (add-hook 'speedbar-load-hook 'gud-install-speedbar-variables)) 487 (add-hook 'speedbar-load-hook 'gud-install-speedbar-variables))
488 488
489(defun gud-expansion-speedbar-buttons (directory zero) 489(defun gud-expansion-speedbar-buttons (directory zero)
490 "Wrapper for call to speedbar-add-expansion-list. DIRECTORY and 490 "Wrapper for call to `speedbar-add-expansion-list'.
491ZERO are not used, but are required by the caller." 491DIRECTORY and ZERO are not used, but are required by the caller."
492 (gud-speedbar-buttons gud-comint-buffer)) 492 (gud-speedbar-buttons gud-comint-buffer))
493 493
494(defun gud-speedbar-buttons (buffer) 494(defun gud-speedbar-buttons (buffer)
495 "Create a speedbar display based on the current state of GUD. 495 "Create a speedbar display based on the current state of GUD.
496If the GUD BUFFER is not running a supported debugger, then turn 496If the GUD BUFFER is not running a supported debugger, then turn
497off the specialized speedbar mode. BUFFER is not used, but are 497off the specialized speedbar mode. BUFFER is not used, but is
498required by the caller." 498required by the caller."
499 (when (and gud-comint-buffer 499 (when (and gud-comint-buffer
500 ;; gud-comint-buffer might be killed 500 ;; gud-comint-buffer might be killed
@@ -919,7 +919,7 @@ It is passed through FILTER before we look at it."
919(defun gud-gdb-run-command-fetch-lines (command buffer &optional skip) 919(defun gud-gdb-run-command-fetch-lines (command buffer &optional skip)
920 "Run COMMAND, and return the list of lines it outputs. 920 "Run COMMAND, and return the list of lines it outputs.
921BUFFER is the current buffer which may be the GUD buffer in which to run. 921BUFFER is the current buffer which may be the GUD buffer in which to run.
922SKIP is the number of chars to skip on each lines, it defaults to 0." 922SKIP is the number of chars to skip on each line, it defaults to 0."
923 (with-current-buffer gud-comint-buffer 923 (with-current-buffer gud-comint-buffer
924 (if (and (eq gud-comint-buffer buffer) 924 (if (and (eq gud-comint-buffer buffer)
925 (save-excursion 925 (save-excursion
@@ -1172,8 +1172,8 @@ a better solution in 6.1 upwards.")
1172(defvar gud-dbx-use-stopformat-p 1172(defvar gud-dbx-use-stopformat-p
1173 (string-match "irix[6-9]\\.[1-9]" system-configuration) 1173 (string-match "irix[6-9]\\.[1-9]" system-configuration)
1174 "Non-nil to use the dbx feature present at least from Irix 6.1 1174 "Non-nil to use the dbx feature present at least from Irix 6.1
1175 whereby $stopformat=1 produces an output format compatiable with 1175whereby $stopformat=1 produces an output format compatible with
1176 `gud-dbx-marker-filter'.") 1176`gud-dbx-marker-filter'.")
1177;; [Irix dbx seems to be a moving target. The dbx output changed 1177;; [Irix dbx seems to be a moving target. The dbx output changed
1178;; subtly sometime between OS v4.0.5 and v5.2 so that, for instance, 1178;; subtly sometime between OS v4.0.5 and v5.2 so that, for instance,
1179;; the output from `up' is no longer spotted by gud (and it's probably 1179;; the output from `up' is no longer spotted by gud (and it's probably
@@ -1765,7 +1765,7 @@ class information on jdb startup (original method)."
1765 :group 'gud) 1765 :group 'gud)
1766 1766
1767(defvar gud-jdb-classpath nil 1767(defvar gud-jdb-classpath nil
1768 "Java/jdb classpath directories list. 1768 "Java/jdb classpath directories list.
1769If `gud-jdb-use-classpath' is non-nil, gud-jdb derives the `gud-jdb-classpath' 1769If `gud-jdb-use-classpath' is non-nil, gud-jdb derives the `gud-jdb-classpath'
1770list automatically using the following methods in sequence 1770list automatically using the following methods in sequence
1771\(with subsequent successful steps overriding the results of previous 1771\(with subsequent successful steps overriding the results of previous
@@ -1774,7 +1774,7 @@ steps):
17741) Read the CLASSPATH environment variable, 17741) Read the CLASSPATH environment variable,
17752) Read any \"-classpath\" argument used to run jdb, 17752) Read any \"-classpath\" argument used to run jdb,
1776 or detected in jdb output (e.g. if jdb is run by a script 1776 or detected in jdb output (e.g. if jdb is run by a script
1777 that echoes the actual jdb command before starting jdb) 1777 that echoes the actual jdb command before starting jdb),
17783) Send a \"classpath\" command to jdb and scan jdb output for 17783) Send a \"classpath\" command to jdb and scan jdb output for
1779 classpath information if jdb is invoked with an \"-attach\" (to 1779 classpath information if jdb is invoked with an \"-attach\" (to
1780 an already running VM) argument (This case typically does not 1780 an already running VM) argument (This case typically does not
@@ -1782,7 +1782,7 @@ steps):
1782 to the VM when it is started). 1782 to the VM when it is started).
1783 1783
1784Note that method 3 cannot be used with oldjdb (or Java 1 jdb) since 1784Note that method 3 cannot be used with oldjdb (or Java 1 jdb) since
1785those debuggers do not support the classpath command. Use 1) or 2).") 1785those debuggers do not support the classpath command. Use 1) or 2).")
1786 1786
1787(defvar gud-jdb-sourcepath nil 1787(defvar gud-jdb-sourcepath nil
1788 "Directory list provided by an (optional) \"-sourcepath\" option to jdb. 1788 "Directory list provided by an (optional) \"-sourcepath\" option to jdb.
@@ -1796,7 +1796,7 @@ the most recent debugger output history while searching for
1796source file information.") 1796source file information.")
1797 1797
1798(defvar gud-jdb-history nil 1798(defvar gud-jdb-history nil
1799"History of argument lists passed to jdb.") 1799 "History of argument lists passed to jdb.")
1800 1800
1801 1801
1802;; List of Java source file directories. 1802;; List of Java source file directories.
@@ -1813,21 +1813,21 @@ file from which the class originated. This allows gud mode to keep
1813the source code display in sync with the debugging session.") 1813the source code display in sync with the debugging session.")
1814 1814
1815(defvar gud-jdb-source-files nil 1815(defvar gud-jdb-source-files nil
1816"List of the java source files for this debugging session.") 1816 "List of the java source files for this debugging session.")
1817 1817
1818;; Association list of fully qualified class names (package + class name) 1818;; Association list of fully qualified class names (package + class name)
1819;; and their source files. 1819;; and their source files.
1820(defvar gud-jdb-class-source-alist nil 1820(defvar gud-jdb-class-source-alist nil
1821"Association list of fully qualified class names and source files.") 1821 "Association list of fully qualified class names and source files.")
1822 1822
1823;; This is used to hold a source file during analysis. 1823;; This is used to hold a source file during analysis.
1824(defvar gud-jdb-analysis-buffer nil) 1824(defvar gud-jdb-analysis-buffer nil)
1825 1825
1826(defvar gud-jdb-classpath-string nil 1826(defvar gud-jdb-classpath-string nil
1827"Holds temporary classpath values.") 1827 "Holds temporary classpath values.")
1828 1828
1829(defun gud-jdb-build-source-files-list (path extn) 1829(defun gud-jdb-build-source-files-list (path extn)
1830"Return a list of java source files (absolute paths). 1830 "Return a list of java source files (absolute paths).
1831PATH gives the directories in which to search for files with 1831PATH gives the directories in which to search for files with
1832extension EXTN. Normally EXTN is given as the regular expression 1832extension EXTN. Normally EXTN is given as the regular expression
1833 \"\\.java$\" ." 1833 \"\\.java$\" ."
@@ -2097,8 +2097,8 @@ extension EXTN. Normally EXTN is given as the regular expression
2097(defvar gud-jdb-lowest-stack-level 999) 2097(defvar gud-jdb-lowest-stack-level 999)
2098 2098
2099(defun gud-jdb-find-source-using-classpath (p) 2099(defun gud-jdb-find-source-using-classpath (p)
2100"Find source file corresponding to fully qualified class p. 2100 "Find source file corresponding to fully qualified class P.
2101Convert p from jdb's output, converted to a pathname 2101Convert P from jdb's output, converted to a pathname
2102relative to a classpath directory." 2102relative to a classpath directory."
2103 (save-match-data 2103 (save-match-data
2104 (let 2104 (let
@@ -2126,14 +2126,14 @@ relative to a classpath directory."
2126 (if found-file (concat (car cplist) "/" filename))))) 2126 (if found-file (concat (car cplist) "/" filename)))))
2127 2127
2128(defun gud-jdb-find-source (string) 2128(defun gud-jdb-find-source (string)
2129"Alias for function used to locate source files. 2129 "Alias for function used to locate source files.
2130Set to `gud-jdb-find-source-using-classpath' or `gud-jdb-find-source-file' 2130Set to `gud-jdb-find-source-using-classpath' or `gud-jdb-find-source-file'
2131during jdb initialization depending on the value of 2131during jdb initialization depending on the value of
2132`gud-jdb-use-classpath'." 2132`gud-jdb-use-classpath'."
2133nil) 2133 nil)
2134 2134
2135(defun gud-jdb-parse-classpath-string (string) 2135(defun gud-jdb-parse-classpath-string (string)
2136"Parse the classpath list and convert each item to an absolute pathname." 2136 "Parse the classpath list and convert each item to an absolute pathname."
2137 (mapcar (lambda (s) (if (string-match "[/\\]$" s) 2137 (mapcar (lambda (s) (if (string-match "[/\\]$" s)
2138 (replace-match "" nil nil s) s)) 2138 (replace-match "" nil nil s) s))
2139 (mapcar 'file-truename 2139 (mapcar 'file-truename
@@ -2260,7 +2260,7 @@ The buffer is named \"*gud*\" if no initial class is given or
2260switch is given, omit all whitespace between it and its value. 2260switch is given, omit all whitespace between it and its value.
2261 2261
2262See `gud-jdb-use-classpath' and `gud-jdb-classpath' documentation for 2262See `gud-jdb-use-classpath' and `gud-jdb-classpath' documentation for
2263information on how jdb accesses source files. Alternatively (if 2263information on how jdb accesses source files. Alternatively (if
2264`gud-jdb-use-classpath' is nil), see `gud-jdb-directories' for the 2264`gud-jdb-use-classpath' is nil), see `gud-jdb-directories' for the
2265original source file access method. 2265original source file access method.
2266 2266
@@ -3016,7 +3016,7 @@ Link exprs of the form:
3016 "Find fully qualified class in file F at line LINE. 3016 "Find fully qualified class in file F at line LINE.
3017This function uses the `gud-jdb-classpath' (and optional 3017This function uses the `gud-jdb-classpath' (and optional
3018`gud-jdb-sourcepath') list(s) to derive a file 3018`gud-jdb-sourcepath') list(s) to derive a file
3019pathname relative to its classpath directory. The values in 3019pathname relative to its classpath directory. The values in
3020`gud-jdb-classpath' are assumed to have been converted to absolute 3020`gud-jdb-classpath' are assumed to have been converted to absolute
3021pathname standards using file-truename. 3021pathname standards using file-truename.
3022If F is visited by a buffer and its mode is CC-mode(Java), 3022If F is visited by a buffer and its mode is CC-mode(Java),
@@ -3214,7 +3214,7 @@ Treats actions as defuns."
3214 3214
3215;;;###autoload 3215;;;###autoload
3216(define-derived-mode gdb-script-mode nil "GDB-Script" 3216(define-derived-mode gdb-script-mode nil "GDB-Script"
3217 "Major mode for editing GDB scripts" 3217 "Major mode for editing GDB scripts."
3218 (set (make-local-variable 'comment-start) "#") 3218 (set (make-local-variable 'comment-start) "#")
3219 (set (make-local-variable 'comment-start-skip) "#+\\s-*") 3219 (set (make-local-variable 'comment-start-skip) "#+\\s-*")
3220 (set (make-local-variable 'outline-regexp) "[ \t]") 3220 (set (make-local-variable 'outline-regexp) "[ \t]")
@@ -3361,7 +3361,7 @@ For C this would dereference a pointer expression.")
3361 3361
3362(defvar gud-tooltip-event nil 3362(defvar gud-tooltip-event nil
3363 "The mouse movement event that led to a tooltip display. 3363 "The mouse movement event that led to a tooltip display.
3364This event can be examined by forms in GUD-TOOLTIP-DISPLAY.") 3364This event can be examined by forms in `gud-tooltip-display'.")
3365 3365
3366(defun gud-tooltip-dereference (&optional arg) 3366(defun gud-tooltip-dereference (&optional arg)
3367 "Toggle whether tooltips should show `* expr' or `expr'. 3367 "Toggle whether tooltips should show `* expr' or `expr'.
@@ -3402,8 +3402,8 @@ With arg, dereference expr if ARG is positive, otherwise do not derereference."
3402(defun gud-tooltip-tips (event) 3402(defun gud-tooltip-tips (event)
3403 "Show tip for identifier or selection under the mouse. 3403 "Show tip for identifier or selection under the mouse.
3404The mouse must either point at an identifier or inside a selected 3404The mouse must either point at an identifier or inside a selected
3405region for the tip window to be shown. If gud-tooltip-dereference is t, 3405region for the tip window to be shown. If `gud-tooltip-dereference' is t,
3406add a `*' in front of the printed expression. In the case of a C program 3406add a `*' in front of the printed expression. In the case of a C program
3407controlled by GDB, show the associated #define directives when program is 3407controlled by GDB, show the associated #define directives when program is
3408not executing. 3408not executing.
3409 3409