mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-02-16 16:24:18 +00:00
aux-props
This commit is contained in:
parent
5f153bb131
commit
c0d89f7b4b
1 changed files with 8 additions and 1 deletions
|
|
@ -50,7 +50,8 @@
|
|||
;; Cached compilation command options
|
||||
(target-clang-opts :initarg :clang-opts :initform nil)
|
||||
;; Target + CPU -> compilation command options
|
||||
(target-clang-opts-fun :initarg :clang-opts-fun :type function :initform (lambda ()))))
|
||||
(target-clang-opts-fun :initarg :clang-opts-fun :type function :initform (lambda ()))
|
||||
(aux-props :initarg :aux-props :type list :initform nil)))
|
||||
|
||||
;; (defvar lls/llvm-config nil)
|
||||
|
||||
|
|
@ -79,6 +80,12 @@
|
|||
(slot-value conf sym)
|
||||
nil))
|
||||
|
||||
(defun lls/conf-aux-get (sym)
|
||||
(lls/ensure-initialized)
|
||||
(-->
|
||||
(lls/conf-get 'aux-props)
|
||||
(alist-get sym it)))
|
||||
|
||||
(defun lls/conf-set (key val)
|
||||
(lls/ensure-initialized)
|
||||
(setf (slot-value (lls/get-llvm-config) key)
|
||||
|
|
|
|||
Loading…
Reference in a new issue