I'd like to suggest adding Paul Graham's very useful function #'mkstr,
and his #'symb
can greatly simplify symbolicate

(defun mkstr (&rest args)
  "Make a string out of the printed representations of the arguments."
  (with-output-to-string (s)
    (dolist (a args) (princ a s))))

(defun symb (&rest args)
  "Make a symbol out of the printed representations of the arguments."
  (intern (apply #'mkstr args)))

(I'd prefer this name, but this definition could just replace symbolicate's.)

Thanks,
Liam

_______________________________________________
alexandria-devel mailing list
alexandria-devel@common-lisp.net
http://common-lisp.net/cgi-bin/mailman/listinfo/alexandria-devel

Reply via email to