Commit 5cc1ee05 authored by pfdietz's avatar pfdietz

Add a variable for the cl symbols in a vector

parent f6b8d45b
......@@ -999,6 +999,9 @@
(mapcar #'(lambda (str) (intern str pkg))
*cl-symbol-names*))))
(defparameter *cl-symbols-vector*
(make-array (length *cl-symbols*) :initial-contents *cl-symbols*))
;;; Symbols classified by their kind in the spec
(defparameter *cl-function-symbols*
'(
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment