From 5cc1ee0533389c5d029c9c8ba7d348cb6dc069b2 Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Sat, 17 Jul 2004 20:24:13 +0000 Subject: [PATCH] Add a variable for the cl symbols in a vector --- ansi-tests/cl-symbol-names.lsp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/ansi-tests/cl-symbol-names.lsp b/ansi-tests/cl-symbol-names.lsp index 49a0e039..ac6036ab 100644 --- a/ansi-tests/cl-symbol-names.lsp +++ b/ansi-tests/cl-symbol-names.lsp @@ -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* '( -- GitLab