syntax-rules: as of now we have no plan to add (... template) pattern support
This commit is contained in:
parent
84bb7e9ffc
commit
02d75b4283
|
@ -460,9 +460,9 @@
|
||||||
(syntax-rules ()
|
(syntax-rules ()
|
||||||
((be-like-begin name)
|
((be-like-begin name)
|
||||||
(define-syntax name
|
(define-syntax name
|
||||||
(syntax-rules ()
|
(syntax-rules ::: ()
|
||||||
((name expr (... ...))
|
((name expr :::)
|
||||||
(begin expr (... ...))))))))
|
(begin expr :::)))))))
|
||||||
(be-like-begin sequence)
|
(be-like-begin sequence)
|
||||||
(test 4 (sequence 1 2 3 4))
|
(test 4 (sequence 1 2 3 4))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue