aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNick Roberts2009-12-14 09:44:43 +0000
committerNick Roberts2009-12-14 09:44:43 +0000
commite960eea6858c14dc39134438ef72040e53d94b97 (patch)
tree3c0885429ca28a9c8dbc367a8c8cd9a909966779
parent6c2b67ad7b6f99245d318094a0450a284b4f0219 (diff)
downloademacs-e960eea6858c14dc39134438ef72040e53d94b97.tar.gz
emacs-e960eea6858c14dc39134438ef72040e53d94b97.zip
(gdb-frame-handler): Only set gud-lat-frame
when there are values for both file and line. (Bug#5060)
-rw-r--r--lisp/progmodes/gdb-mi.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 703f4ac6162..0f9532dcb3e 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -3754,9 +3754,8 @@ overlay arrow in source buffer."
3754 (setq gdb-frame-number (bindat-get-field frame 'level)) 3754 (setq gdb-frame-number (bindat-get-field frame 'level))
3755 (setq gdb-frame-address (bindat-get-field frame 'addr)) 3755 (setq gdb-frame-address (bindat-get-field frame 'addr))
3756 (let ((line (bindat-get-field frame 'line))) 3756 (let ((line (bindat-get-field frame 'line)))
3757 (setq gdb-selected-line (or (and line (string-to-number line)) 3757 (setq gdb-selected-line (and line (string-to-number line)))
3758 nil)) ; don't fail if line is nil 3758 (when (and gdb-selected-file gdb-selected-line)
3759 (when line ; obey the current file only if we have line info
3760 (setq gud-last-frame (cons gdb-selected-file gdb-selected-line)) 3759 (setq gud-last-frame (cons gdb-selected-file gdb-selected-line))
3761 (gud-display-frame))) 3760 (gud-display-frame)))
3762 (if gud-overlay-arrow-position 3761 (if gud-overlay-arrow-position