diff options
| author | Nick Roberts | 2006-04-17 19:50:14 +0000 |
|---|---|---|
| committer | Nick Roberts | 2006-04-17 19:50:14 +0000 |
| commit | d19c35c1c98ebead51d004b389b60aa9d3ef9a89 (patch) | |
| tree | 5a53ee9c926c5eb71af37afaf5eb401440db4efc | |
| parent | ec180a262571a13e414ad4430310cc6415855fa8 (diff) | |
| download | emacs-d19c35c1c98ebead51d004b389b60aa9d3ef9a89.tar.gz emacs-d19c35c1c98ebead51d004b389b60aa9d3ef9a89.zip | |
(gud-speedbar-item-info): Display frame address for root variables.
| -rw-r--r-- | lisp/progmodes/gud.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 907a2e7c300..e1e2b9e28cd 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -374,8 +374,9 @@ t means that there is no stack, and we are in display-file mode.") | |||
| 374 | (defun gud-speedbar-item-info () | 374 | (defun gud-speedbar-item-info () |
| 375 | "Display the data type of the watch expression element." | 375 | "Display the data type of the watch expression element." |
| 376 | (let ((var (nth (- (line-number-at-pos (point)) 2) gdb-var-list))) | 376 | (let ((var (nth (- (line-number-at-pos (point)) 2) gdb-var-list))) |
| 377 | (if (nth 4 var) | 377 | (if (nth 6 var) |
| 378 | (speedbar-message "%s" (nth 3 var))))) | 378 | (speedbar-message "%s: %s" (nth 6 var) (nth 3 var)) |
| 379 | (speedbar-message "%s" (nth 3 var))))) | ||
| 379 | 380 | ||
| 380 | (defun gud-install-speedbar-variables () | 381 | (defun gud-install-speedbar-variables () |
| 381 | "Install those variables used by speedbar to enhance gud/gdb." | 382 | "Install those variables used by speedbar to enhance gud/gdb." |