mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-02-16 16:24:18 +00:00
Pass name and compiler through
This commit is contained in:
parent
ad22724e42
commit
2966ad74e3
2 changed files with 7 additions and 4 deletions
|
|
@ -72,7 +72,10 @@
|
|||
(let ((compiler-action (aml/get-map-prop ll/c-file-action-map action :compiler-action))
|
||||
(compiler (lls/prompt-tool "clang$")))
|
||||
(string-join
|
||||
(list (lls/get-clang-command-fun compiler file compiler-action)
|
||||
(list (lls/get-clang-command-fun
|
||||
:compiler compiler
|
||||
:file file
|
||||
:action compiler-action)
|
||||
(pcase action
|
||||
('debug (format "-mllvm -debug-only=%s" (ll/read-pass-name "Which pass? ")))
|
||||
('before-after (let ((pass (ll/read-pass-name "Which pass? ")))
|
||||
|
|
|
|||
|
|
@ -189,9 +189,9 @@
|
|||
(cons dir
|
||||
(lls/conf-get 'build-dirs))))
|
||||
|
||||
(defun lls/get-clang-options (&optional file compiler)
|
||||
(funcall (lls/conf-get 'target-clang-opts-fun)
|
||||
:compiler compiler :filename file))
|
||||
(defun lls/get-clang-options (&rest args)
|
||||
(apply (lls/conf-get 'target-clang-opts-fun)
|
||||
args))
|
||||
|
||||
;; =============================== Misc ==============================
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue