From: Nick Roberts <nickrob@snap.net.nz>
Date: Tue, 20 Jun 2006 22:35:19 +0000 (+0000)
Subject: (gdb-exited): Ensure overlay arrow gets killed.
X-Git-Tag: emacs-pretest-22.0.90~1898
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3cfc0f435de7ecf1235353dfe25fd9b035c093a9;p=emacs.git

(gdb-exited): Ensure overlay arrow gets killed.
(gdb-frame-handler): Generalise frame regexp for templates.
---

diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el
index f3144cbb84a..684102015cc 100644
--- a/lisp/progmodes/gdb-ui.el
+++ b/lisp/progmodes/gdb-ui.el
@@ -1325,6 +1325,7 @@ directives."
   (setq gdb-active-process nil)
   (setq gud-overlay-arrow-position nil)
   (setq gdb-overlay-arrow-position nil)
+  (setq gud-old-arrow nil)
   (setq gdb-inferior-status "exited")
   (gdb-force-mode-line-update gdb-inferior-status)
   (gdb-stopping ignored))
@@ -3217,8 +3218,8 @@ BUFFER nil or omitted means use the current buffer."
     (setq gdb-frame-number (match-string 1))
     (setq gdb-frame-address (match-string 2)))
   (goto-char (point-min))
-  (when (re-search-forward ".*=\\s-+0x0*\\(\\S-*\\)\\s-+in\\s-+\\(\\S-+?\\)\
-\\(?: (\\(\\S-+?\\):[0-9]+?)\\)*;? "
+  (when (re-search-forward ".*=\\s-+0x0*\\(\\S-*\\)\\s-+in\\s-+\\(.*?\\)\
+\\(?: (\\(\\S-+?\\):[0-9]+?)\\)*; "
      nil t)
     (setq gdb-selected-frame (match-string 2))
     (if (gdb-get-buffer 'gdb-locals-buffer)