[Openmcl-devel] (symbol-function function-name) no error signaled

Frank some.frank at gmail.com
Tue Jan 11 11:54:06 PST 2011


Hello,
Just stumbled over this while I was reading the HS.  Shouldn't 
symbol-function signal an error if it's argument doesn't evaluate to a 
symbol?

(defparameter *store* nil)

(defun (setf store) (newval)
  (setf *store* newval))

(symbol-function '(setf store))  ; Shouldn't this signal an error?

#:Frank





More information about the Openmcl-devel mailing list