[Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el,v

[Nick Roberts]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Nick Roberts <nickrob>  06/07/31 06:13:18

Index: gdb-ui.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/gdb-ui.el,v
retrieving revision 1.176
retrieving revision 1.177
diff -u -b -r1.176 -r1.177
--- gdb-ui.el   28 Jul 2006 12:11:09 -0000      1.176
+++ gdb-ui.el   31 Jul 2006 06:13:18 -0000      1.177
@@ -1358,6 +1358,12 @@
   :type 'boolean
   :version "22.1")
 
+(defcustom gdb-find-source-frame t
+  "Non-nil means try to find source further up stack e.g after signal."
+  :group 'gud
+  :type 'boolean
+  :version "22.1")
+
 (defun gdb-stopped (ignored)
   "An annotation handler for `stopped'.
 It is just like `gdb-stopping', except that if we already set the output
@@ -1371,6 +1377,7 @@
     (if gdb-same-frame
        (gdb-display-gdb-buffer)
       (gdb-frame-gdb-buffer))
+    (if gdb-find-source-frame
     ;;Try to find source further up stack e.g after signal.
     (setq gdb-look-up-stack
          (if (gdb-get-buffer 'gdb-stack-buffer)
@@ -1378,7 +1385,7 @@
            (progn
              (gdb-get-buffer-create 'gdb-stack-buffer)
              (gdb-invalidate-frames)
-             'delete)))))
+                 'delete))))))
   (unless (member gdb-inferior-status '("exited" "signal"))
     (setq gdb-inferior-status "stopped")
     (gdb-force-mode-line-update