Making emacs like function documentation.

[Manuel Cano]

Hi,

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


-- 
Manuel