On Fri, Nov 22, 2002 at 03:47:58PM +0100, jblazi wrote:
> How can I write the following macro in Guile:
> 
> (define-syntax defpoint
>   (syntax-rules
>     ()
>     ( (defpoint p) (display "ERROR"))
>     ( (defpoint p p-tupel) (define p (apply point 'p-tupel)))
>     ( (defpoint p p-tupel pp ...) (begin (defpoint p p-tupel) (defpoint pp 
> ...)))))

Just like that.

However, you must first:

        (use-syntax (ice-9 syncase))