From dfb7d19560644a039e2f4d302782977f5e6c6b89 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Sat, 27 May 1995 00:36:36 +0000 Subject: [PATCH] (gud-gdb-marker-regexp): New var. Use path-separator. --- lisp/gud.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/gud.el b/lisp/gud.el index 75f56b90d45..a12c84c5fda 100644 --- a/lisp/gud.el +++ b/lisp/gud.el @@ -170,6 +170,10 @@ we're in the GUD buffer)." (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 @@ we're in the GUD buffer)." (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. -- 2.39.2