LispForum

Posted: **Fri Jul 01, 2011 5:38 am**

I am trying to write a macro which works the same as defun - with name as "def"... Can anybody help? I think you can't write a function for this since you need to evaluate the name of the function, eg,

Code: Select all

(defmacro def (name parameters body) ?)

And the other problem is that there need to be multiple optional arguments and the body of the macro.
TIA

Posted: **Fri Jul 01, 2011 6:06 am**

Usually defun is defined something like this:

Code: Select all

(defmacro def (name lambda-list &body body)
  (setf (symbol-function ',name)
        #'(lambda ,lambda-list ,@body)))

Posted: **Fri Jul 01, 2011 7:10 am**

Shameless plug: http://common-lisp.net/project/definer/

cheers

LispForum

Alternative "defun"

Alternative "defun"

Re: Alternative "defun"

Re: Alternative "defun"