[Openmcl-devel] make-keyword

Leslie P. Polzer sky at viridian-project.de
Thu Oct 22 08:08:44 UTC 2009


Taoufik Dachraoui wrote:

> is there a function make-keyword that takes a symbol s as parameter and
> returns a keyword k such that (eq (symbol-name s) (symbol-name k)) is T

(defun make-keyword (sym)
  (intern (symbol-name sym) :keyword))

-- 
http://www.linkedin.com/in/polzer




More information about the Openmcl-devel mailing list