aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNick Roberts2007-11-05 06:40:26 +0000
committerNick Roberts2007-11-05 06:40:26 +0000
commitc91d7cbb087fa8119fbf1f32c68472bb61df2750 (patch)
tree609e6252ef1b1e3e65d4d05facfe38406bb6409e
parent146836787ab306b254ebb40e48435345d92afd80 (diff)
downloademacs-c91d7cbb087fa8119fbf1f32c68472bb61df2750.tar.gz
emacs-c91d7cbb087fa8119fbf1f32c68472bb61df2750.zip
(gud-gdb): Remove vestigial gdba doc and code.
-rw-r--r--lisp/progmodes/gud.el19
1 files changed, 4 insertions, 15 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index e5217b7162a..5e11b73916e 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -696,25 +696,14 @@ The option \"--fullname\" must be included in this value."
696(defvar gud-filter-pending-text nil 696(defvar gud-filter-pending-text nil
697 "Non-nil means this is text that has been saved for later in `gud-filter'.") 697 "Non-nil means this is text that has been saved for later in `gud-filter'.")
698 698
699;; The old gdb command. The new one is in gdb-ui.el. 699;; The old gdb command (text command mode). The new one is in gdb-ui.el.
700;;;###autoload 700;;;###autoload
701(defun gud-gdb (command-line) 701(defun gud-gdb (command-line)
702 "Run gdb on program FILE in buffer *gud-FILE*. 702 "Run gdb on program FILE in buffer *gud-FILE*.
703The directory containing FILE becomes the initial working 703The directory containing FILE becomes the initial working
704directory and source-file directory for your debugger. By 704directory and source-file directory for your debugger."
705default this command starts GDB using a graphical interface. See
706`gdba' for more information.
707
708To run GDB in text command mode, replace the GDB \"--annotate=3\"
709option with \"--fullname\" either in the minibuffer for the
710current Emacs session, or the custom variable
711`gud-gdb-command-name' for all future sessions. You need to use
712text command mode to debug multiple programs within one Emacs
713session."
714 (interactive (list (gud-query-cmdline 'gud-gdb))) 705 (interactive (list (gud-query-cmdline 'gud-gdb)))
715 706
716 (require 'gdb-ui)
717
718 (when (and gud-comint-buffer 707 (when (and gud-comint-buffer
719 (buffer-name gud-comint-buffer) 708 (buffer-name gud-comint-buffer)
720 (get-buffer-process gud-comint-buffer) 709 (get-buffer-process gud-comint-buffer)
@@ -723,8 +712,8 @@ session."
723 (error 712 (error
724 "Multiple debugging requires restarting in text command mode")) 713 "Multiple debugging requires restarting in text command mode"))
725 714
726 (gud-common-init command-line nil 'gud-gdba-marker-filter) 715 (gud-common-init command-line nil 'gud-gdb-marker-filter)
727 (set (make-local-variable 'gud-minor-mode) 'gdba) 716 (set (make-local-variable 'gud-minor-mode) 'gdb)
728 717
729 (gud-def gud-break "break %f:%l" "\C-b" "Set breakpoint at current line.") 718 (gud-def gud-break "break %f:%l" "\C-b" "Set breakpoint at current line.")
730 (gud-def gud-tbreak "tbreak %f:%l" "\C-t" 719 (gud-def gud-tbreak "tbreak %f:%l" "\C-t"