[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 8b96503b6e8: * lisp/emacs-lisp/cl-preloaded.el (cl--typeof-types)
From: |
Andrea Corallo |
Subject: |
master 8b96503b6e8: * lisp/emacs-lisp/cl-preloaded.el (cl--typeof-types): Define as var. |
Date: |
Fri, 1 Mar 2024 12:59:50 -0500 (EST) |
branch: master
commit 8b96503b6e8514f1f9f92895a0707c78b1bbd1fd
Author: Andrea Corallo <andcor03@e132096.arm.com>
Commit: Andrea Corallo <andcor03@e132096.arm.com>
* lisp/emacs-lisp/cl-preloaded.el (cl--typeof-types): Define as var.
---
lisp/emacs-lisp/cl-preloaded.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/cl-preloaded.el b/lisp/emacs-lisp/cl-preloaded.el
index 30753bcd5c5..b2b921192ff 100644
--- a/lisp/emacs-lisp/cl-preloaded.el
+++ b/lisp/emacs-lisp/cl-preloaded.el
@@ -92,7 +92,7 @@ Each sublist is in the form (TYPE . DIRECT_SUBTYPES)"
for child in children
do (cl-pushnew parent (gethash child cl--direct-supertypes-of-type))))
-(defconst cl--typeof-types nil
+(defvar cl--typeof-types nil
"Alist of supertypes.
Each element has the form (TYPE . SUPERTYPES) where TYPE is one of
the symbols returned by `type-of', and SUPERTYPES is the list of its
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 8b96503b6e8: * lisp/emacs-lisp/cl-preloaded.el (cl--typeof-types): Define as var.,
Andrea Corallo <=