procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix gud-lldb-command-name

Browse source 
* lisp/progmodes/gud.el (gud-gud-lldb-command-name): Change to
gud-lldb-command-name.
(lldb): Don't do stuff that is not needed for lldb.
This commit is contained in:
Gerd Möllmann 2024-04-26 12:25:28 +02:00
parent 758fe9b670
commit 763eaa5a32
1 changed files with 2 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
lisp/progmodes/gud.el
View file

@ -3854,12 +3854,12 @@ so they have been disabled."))
expr))))))))
;; 'gud-lldb-history' and 'gud-gud-lldb-command-name' are required
;; 'gud-lldb-history' and 'gud-lldb-command-name' are required
;; because 'gud-symbol' uses their values if they are present. Their
;; names are deduced from the minor-mode name.
(defvar gud-lldb-history nil)
(defcustom gud-gud-lldb-command-name "lldb"
(defcustom gud-lldb-command-name "lldb"
"Default command to invoke LLDB in order to debug a program with it."
:type 'string
:version "30.1")
@ -4057,15 +4057,6 @@ consider to turn them off in this mode.
This command runs functions from `lldb-mode-hook'."
(interactive (list (gud-query-cmdline 'lldb)))
(when (and gud-comint-buffer
(buffer-name gud-comint-buffer)
(get-buffer-process gud-comint-buffer)
(with-current-buffer gud-comint-buffer (eq gud-minor-mode 'gud-lldb)))
(gdb-restore-windows)
;; FIXME: Copied from gud-gdb, but what does that even say?
(error "Multiple debugging requires restarting in text command mode"))
(gud-common-init command-line nil 'gud-lldb-marker-filter)
(setq-local gud-minor-mode 'lldb)