(string (values (coerce thing 'simple-string) old)))
(declare (simple-string prefix))
(make-symbol (%make-symbol-name prefix int)))))
(string (values (coerce thing 'simple-string) old)))
(declare (simple-string prefix))
(make-symbol (%make-symbol-name prefix int)))))