Mercurial > emacs
comparison lisp/progmodes/gdb-ui.el @ 62723:0ae5fe9ca759
*** empty log message ***
| author | Nick Roberts <nickrob@snap.net.nz> |
|---|---|
| date | Thu, 26 May 2005 12:41:35 +0000 |
| parents | 05f48d9c5aed |
| children | 787677122f52 |
comparison
equal
deleted
inserted
replaced
| 62722:44ff539fa276 | 62723:0ae5fe9ca759 |
|---|---|
| 73 (defvar gdb-selected-frame nil) | 73 (defvar gdb-selected-frame nil) |
| 74 (defvar gdb-frame-number nil) | 74 (defvar gdb-frame-number nil) |
| 75 (defvar gdb-current-language nil) | 75 (defvar gdb-current-language nil) |
| 76 (defvar gdb-var-list nil "List of variables in watch window.") | 76 (defvar gdb-var-list nil "List of variables in watch window.") |
| 77 (defvar gdb-var-changed nil "Non-nil means that gdb-var-list has changed.") | 77 (defvar gdb-var-changed nil "Non-nil means that gdb-var-list has changed.") |
| 78 (defvar gdb-main-file nil "Source file from which program execution begins.") | |
| 78 (defvar gdb-buffer-type nil) | 79 (defvar gdb-buffer-type nil) |
| 79 (defvar gdb-overlay-arrow-position nil) | 80 (defvar gdb-overlay-arrow-position nil) |
| 80 (defvar gdb-server-prefix nil) | 81 (defvar gdb-server-prefix nil) |
| 81 (defvar gdb-flush-pending-output nil) | 82 (defvar gdb-flush-pending-output nil) |
| 82 (defvar gdb-location-alist nil | 83 (defvar gdb-location-alist nil |
| 209 :type 'string | 210 :type 'string |
| 210 :group 'gud | 211 :group 'gud |
| 211 :version "22.1") | 212 :version "22.1") |
| 212 | 213 |
| 213 (defcustom gdb-cpp-define-alist-flags "" | 214 (defcustom gdb-cpp-define-alist-flags "" |
| 214 "*Preprocessor flags for `gdb-cpp-define-alist-program'." | 215 "Preprocessor flags for `gdb-cpp-define-alist-program'." |
| 215 :type 'string | 216 :type 'string |
| 217 :group 'gud | |
| 218 :version "22.1") | |
| 219 | |
| 220 (defcustom gdb-show-main nil | |
| 221 "Non-nil means display source file containing the main routine at startup. | |
| 222 Also display the main routine in the disassembly buffer if present." | |
| 223 :type 'boolean | |
| 216 :group 'gud | 224 :group 'gud |
| 217 :version "22.1") | 225 :version "22.1") |
| 218 | 226 |
| 219 (defvar gdb-define-alist nil "Alist of #define directives for GUD tooltips.") | 227 (defvar gdb-define-alist nil "Alist of #define directives for GUD tooltips.") |
| 220 | 228 |
| 2135 "Display GUD buffer." | 2143 "Display GUD buffer." |
| 2136 (interactive) | 2144 (interactive) |
| 2137 (gdb-display-buffer | 2145 (gdb-display-buffer |
| 2138 (gdb-get-create-buffer 'gdba))) | 2146 (gdb-get-create-buffer 'gdba))) |
| 2139 | 2147 |
| 2140 (defvar gdb-main-file nil "Source file from which program execution begins.") | |
| 2141 | |
| 2142 (defcustom gdb-show-main nil | |
| 2143 "Non-nil means display source file containing the main routine at startup." | |
| 2144 "Also display the main routine in the disassembly buffer if present." | |
| 2145 :type 'boolean | |
| 2146 :group 'gud | |
| 2147 :version "22.1") | |
| 2148 | |
| 2149 (defun gdb-set-window-buffer (name) | 2148 (defun gdb-set-window-buffer (name) |
| 2150 (set-window-buffer (selected-window) (get-buffer name)) | 2149 (set-window-buffer (selected-window) (get-buffer name)) |
| 2151 (set-window-dedicated-p (selected-window) t)) | 2150 (set-window-dedicated-p (selected-window) t)) |
| 2152 | 2151 |
| 2153 (defun gdb-setup-windows () | 2152 (defun gdb-setup-windows () |