Rework where `comp-ctxt' is defined.
* test/lisp/emacs-lisp/comp-cstr-tests.el (comp-ctxt): Remove `comp-ctxt' definition. * lisp/emacs-lisp/comp.el (comp-ctxt): Likewise. * lisp/emacs-lisp/comp-cstr.el (comp-ctxt): Define it here.
This commit is contained in:
parent
4396ef5a38
commit
edf42af2cc
3 changed files with 4 additions and 4 deletions
|
@ -175,6 +175,10 @@ Return them as multiple value."
|
|||
collect cstr into positives
|
||||
finally return (cl-values positives negatives)))
|
||||
|
||||
;; So we can load comp-cstr.el and comp.el in non native compiled
|
||||
;; builds.
|
||||
(defvar comp-ctxt)
|
||||
|
||||
(defvar comp-cstr-one (comp-value-to-cstr 1)
|
||||
"Represent the integer immediate one.")
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue