[R6RS] SYNTAX-CASE

[dyb at cs.indiana.edu]

> >>   Moreover, probably something like SYNTAX->LIST is needed.
>
> Kent> It's not needed, since it's easily defined using syntax-case, but perhaps
> Kent> we should include it anyway.
>
> Could you post a definition?  I probably lack sufficient practice :-)

> (define syntax->list
    (lambda (x)
      (syntax-case x ()
        [() '()]
        [(a . d) (cons #'a (syntax->list #'d))])))
> (syntax->list #'(a b c))
(#<syntax a> #<syntax b> #<syntax c>)