Anonymous user
Enumerations: Difference between revisions
m
Shortened my Scheme using syntax extension
(Scheme syntax extension) |
m (Shortened my Scheme using syntax extension) |
||
Line 1,822:
(lambda (x)
(syntax-case x ()
((_ name nxint
(
((_ name nxint (sym val) rest ...)
(and (identifier? (syntax sym))
|