Mercurial > emacs
changeset 11960:5d3f2639cf3a
(gud-gdb-marker-regexp): New var. Use path-separator.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Sat, 27 May 1995 00:36:36 +0000 |
| parents | 0b8b8be6a3fd |
| children | b5efbe330c86 |
| files | lisp/gud.el |
| diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gud.el Sat May 27 00:36:25 1995 +0000 +++ b/lisp/gud.el Sat May 27 00:36:36 1995 +0000 @@ -170,6 +170,10 @@ (defun gud-gdb-massage-args (file args) (cons "-fullname" args)) +(defvar gud-gdb-marker-regexp + (concat "\032\032\\([^" path-separator "\n]*\\)" path-separator + "\\([0-9]*\\)" path-separator ".*\n")) + ;; There's no guarantee that Emacs will hand the filter the entire ;; marker at once; it could be broken up across several strings. We ;; might even receive a big chunk with several markers in it. If we @@ -184,8 +188,7 @@ (let ((output "")) ;; Process all the complete markers in this chunk. - (while (string-match "\032\032\\([^:\n]*\\):\\([0-9]*\\):.*\n" - gud-marker-acc) + (while (string-match gud-gdb-marker-regexp gud-marker-acc) (setq ;; Extract the frame position from the marker.