Mercurial > emacs
changeset 9637:208a783fe72a
(dbx): Delete call to gud-switch-to-buffer.
(gud-sdb-marker-filter): Handle SVR4 clumped lines.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 21 Oct 1994 19:27:26 +0000 |
| parents | bfc3782dd769 |
| children | e77a0d87d792 |
| files | lisp/gud.el |
| diffstat | 1 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gud.el Fri Oct 21 18:43:22 1994 +0000 +++ b/lisp/gud.el Fri Oct 21 19:27:26 1994 +0000 @@ -362,6 +362,16 @@ (substring string (match-beginning 2) (match-end 2)) (string-to-int (substring string (match-beginning 3) (match-end 3)))))) + ;; System V Release 4.0 quite often clumps two lines together + ((string-match "^\\(BREAKPOINT\\|STEPPED\\) process [0-9]+ function [^ ]+ in \\(.+\\)\n\\([0-9]+\\):" + string) + (setq gud-sdb-lastfile + (substring string (match-beginning 2) (match-end 2))) + (setq gud-last-frame + (cons + gud-sdb-lastfile + (string-to-int + (substring string (match-beginning 3) (match-end 3)))))) ;; System V Release 4.0 ((string-match "^\\(BREAKPOINT\\|STEPPED\\) process [0-9]+ function [^ ]+ in \\(.+\\)\n" string) @@ -594,8 +604,6 @@ nil nil '(gud-dbx-history . 1)))) - (gud-switch-to-buffer command-line) - (cond (gud-mips-p (gud-common-init command-line 'gud-mipsdbx-massage-args