(defun radix-values (radix)
(assert (<= 2 radix 35)
(radix)
"RADIX must be between 2 and 35 (inclusive), not ~D." radix)
(make-array radix
:displaced-to "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
:displaced-index-offset 0
:element-type 'character))Source Context