mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

"M-x lldb": bugfix source code location without column

Browse source 
* lisp/progmodes/gud.el (gud-lldb-marker-filter): Fix problem
where the source code location ends up at the last character of
the previous line if no (or zero) column is reported by lldb.
(Bug#79360)

Copyright-paperwork-exempt: yes
This commit is contained in:
Gustav Hållberg 2025-09-01 12:31:49 +02:00 • committed by Eli Zaretskii
parent fb969ab174
commit 7b09f8bb7c
1 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/progmodes/gud.el
View file

@ -446,8 +446,9 @@ we're in the GUD buffer)."
,(if key `(define-key gud-global-map ,key #',func))))
;; Where gud-display-frame should put the debugging arrow; a cons of
;; (filename . line-number). This is set by the marker-filter, which scans
;; the debugger's output for indications of the current program counter.
;; (filename . line-number) or (list filename line-number column-number).
;; This is set by the marker-filter, which scans the debugger's output
;; for indications of the current program counter.
(defvar gud-last-frame nil)
;; Used by gud-refresh, which should cause gud-display-frame to redisplay
@ -3854,8 +3855,10 @@ so they have been disabled."))
(lambda (m)
(let ((line (string-to-number (match-string 1 m)))
(col (string-to-number (match-string 2 m)))
(file (match-string 3 m)))
(setq gud-last-frame (list file line col)))
(file (match-string 3 m)))
(setq gud-last-frame (if (zerop col)
(cons file line)
(list file line col))))
;; Remove the line so that the user won't see it.
"")
string t t))