Re: [Chicken-users] Re: A few questions

[Kon Lovett]

On Jan 31, 2008, at 9:02 AM, Elf wrote:

> this brings to mind a fourth possibility:
>
> chicken-man is hopelessly out of date.
> an entirely new chicken-man-ish system, and export external docs  
> that can be loaded if desired.  this gives the same set of  
> functionality without
> requiring strings on the stack, and should be slightly easier to  
> maintain in
> the long run, i think.  unfortunately it doesnt solve the problem  
> of arity.
>
>
> arity should be fairly simple though...

Sorry, no. See:
http://lists.gnu.org/archive/html/chicken-users/2008-01/msg00229.html

> -elf

See:
http://chicken.wiki.br/procedure-decoration

(use procedure-decoration)
(define-procedure-extender docstring procedure-documentation  
documented-procedure?)
(define-macro (define/doc ?head ?docstr . ?body)
  (let ([nam (if (pair? ?head) (car ?head) ?head)])
    `(begin
       (define ,?head ,@?body)
       (set! (procedure-documentation ,nam) ,?docstr) ) ) )

(define/doc (foo . args) "procedure is foo" #t)
(procedure-documentation foo)

<snip>

Best Wishes,
Kon