Commit bfd458cd authored by Attila Lendvai's avatar Attila Lendvai
Browse files

fix: provide an appropriate value for a declaimed type.

otherwise SBCL complains.
parent 6121cc21
......@@ -27,7 +27,8 @@
(def-read-suppress-test read-suppress.12 "(...)")
(defparameter *non-macro-chars*
(coerce "1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ-=+_~!@$%^&*{}[]<>/?."
(declaim (type simple-base-string *non-macro-chars*))
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