Mercurial > emacs
changeset 62884:ab597e7c8a07
(gdb-toggle-breakpoint): Make regexp more robust.
(gdb-display-assembler-buffer, gdb-frame-assembler-buffer):
Force regeneration of disassembly.
| author | Nick Roberts <nickrob@snap.net.nz> |
|---|---|
| date | Mon, 30 May 2005 06:11:01 +0000 |
| parents | bc27adf64f40 |
| children | ef148239f15d |
| files | lisp/progmodes/gdb-ui.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/gdb-ui.el Mon May 30 06:10:14 2005 +0000 +++ b/lisp/progmodes/gdb-ui.el Mon May 30 06:11:01 2005 +0000 @@ -1446,9 +1446,9 @@ (save-excursion (beginning-of-line 1) (if (if (with-current-buffer gud-comint-buffer (eq gud-minor-mode 'gdba)) - (looking-at "\\([0-9]+\\).*point\\s-*\\S-*\\s-*\\(.\\)") + (looking-at "\\([0-9]+\\).*?point\\s-+\\S-+\\s-+\\(.\\)\\s-+") (looking-at - "\\([0-9]+\\)\\s-*\\S-*\\s-*\\S-*\\s-*\\(.\\)\\s-*\\S-*\\s-*\\S-*:[0-9]+")) + "\\([0-9]+\\)\\s-+\\S-+\\s-+\\S-+\\s-+\\(.\\)\\s-+\\S-+\\s-+\\S-+:[0-9]+")) (gdb-enqueue-input (list (concat gdb-server-prefix @@ -2554,12 +2554,14 @@ (defun gdb-display-assembler-buffer () "Display disassembly view." (interactive) + (setq gdb-previous-frame nil) (gdb-display-buffer (gdb-get-create-buffer 'gdb-assembler-buffer))) (defun gdb-frame-assembler-buffer () "Display disassembly view in a new frame." (interactive) + (setq gdb-previous-frame nil) (let ((special-display-regexps (append special-display-regexps '(".*"))) (special-display-frame-alist gdb-frame-parameters)) (display-buffer (gdb-get-create-buffer 'gdb-assembler-buffer))))