Why not just this? (de thefunc (A B C)
"This is the help text" (* A B C) ) On Aug 2, 2015 9:54 AM, "Alexander Burger" <a...@software-lab.de> wrote: > Hi Manuel, > > > I'm trying to create a function to define functions with a documentation > > string like emacs "defun". I'm trying something like this: > > > > (de defun P > > (def (car P) ... > > > > So the car of P is de function name, but it doesn't works as expected. > > You may try this: > > (de defun P > (put (car P) 'doc (caddr P)) > (def (car P) (cons (cadr P) (cdddr P))) ) > > > Then: > : (defun thefunc (A B C) > "This is the help text" > (* A B C) ) > -> thefunc > > : (pp 'thefunc) > (de thefunc (A B C) > (* A B C) ) > -> thefunc > > : (get 'thefunc 'doc) > -> "This is the help text" > > ♪♫ Alex > -- > UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe >