diff options
| author | Juanma Barranquero | 2005-08-30 10:54:08 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2005-08-30 10:54:08 +0000 |
| commit | bf1d7e442939018b40bb8343b6fce8e85126f1fd (patch) | |
| tree | c04ca372130b5ed2a78bc71e78f163e4b26f6be9 | |
| parent | 1769936dd0434f817a28e1cba684f31b17e09a4e (diff) | |
| download | emacs-bf1d7e442939018b40bb8343b6fce8e85126f1fd.tar.gz emacs-bf1d7e442939018b40bb8343b6fce8e85126f1fd.zip | |
(tool-bar-map): Add defvar.
(gdb-frame-parameters): Declare before use.
| -rw-r--r-- | lisp/progmodes/gdb-ui.el | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index a1c6f0a80b0..6c960c4c5d5 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el | |||
| @@ -79,6 +79,8 @@ | |||
| 79 | 79 | ||
| 80 | (require 'gud) | 80 | (require 'gud) |
| 81 | 81 | ||
| 82 | (defvar tool-bar-map) | ||
| 83 | |||
| 82 | (defvar gdb-frame-address "main" "Initialization for Assembler buffer.") | 84 | (defvar gdb-frame-address "main" "Initialization for Assembler buffer.") |
| 83 | (defvar gdb-previous-frame-address nil) | 85 | (defvar gdb-previous-frame-address nil) |
| 84 | (defvar gdb-memory-address "main") | 86 | (defvar gdb-memory-address "main") |
| @@ -704,6 +706,13 @@ The key should be one of the cars in `gdb-buffer-rules-assoc'." | |||
| 704 | (gdb-display-buffer | 706 | (gdb-display-buffer |
| 705 | (gdb-get-create-buffer 'gdb-inferior-io)))) | 707 | (gdb-get-create-buffer 'gdb-inferior-io)))) |
| 706 | 708 | ||
| 709 | (defconst gdb-frame-parameters | ||
| 710 | '((height . 14) (width . 80) | ||
| 711 | (unsplittable . t) | ||
| 712 | (tool-bar-lines . nil) | ||
| 713 | (menu-bar-lines . nil) | ||
| 714 | (minibuffer . nil))) | ||
| 715 | |||
| 707 | (defun gdb-frame-inferior-io-buffer () | 716 | (defun gdb-frame-inferior-io-buffer () |
| 708 | "Display IO of inferior in a new frame." | 717 | "Display IO of inferior in a new frame." |
| 709 | (interactive) | 718 | (interactive) |
| @@ -1410,13 +1419,6 @@ static char *magick[] = { | |||
| 1410 | (gdb-display-buffer | 1419 | (gdb-display-buffer |
| 1411 | (gdb-get-create-buffer 'gdb-breakpoints-buffer))) | 1420 | (gdb-get-create-buffer 'gdb-breakpoints-buffer))) |
| 1412 | 1421 | ||
| 1413 | (defconst gdb-frame-parameters | ||
| 1414 | '((height . 14) (width . 80) | ||
| 1415 | (unsplittable . t) | ||
| 1416 | (tool-bar-lines . nil) | ||
| 1417 | (menu-bar-lines . nil) | ||
| 1418 | (minibuffer . nil))) | ||
| 1419 | |||
| 1420 | (defun gdb-frame-breakpoints-buffer () | 1422 | (defun gdb-frame-breakpoints-buffer () |
| 1421 | "Display status of user-settable breakpoints in a new frame." | 1423 | "Display status of user-settable breakpoints in a new frame." |
| 1422 | (interactive) | 1424 | (interactive) |