* lisp/emacs-lisp/cl-preloaded.el (cl--typeof-types): Define as var.
This commit is contained in:
parent
b2d18ff944
commit
8b96503b6e
1 changed files with 1 additions and 1 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Reference in a new issue