diff --git a/lisp/llvm-lib/llvm-shared.el b/lisp/llvm-lib/llvm-shared.el index db7c6d8..ad92ba0 100644 --- a/lisp/llvm-lib/llvm-shared.el +++ b/lisp/llvm-lib/llvm-shared.el @@ -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)