Add some comments
This commit is contained in:
JackFirth 2014-12-09 22:38:56 -08:00
parent 972537a464
commit d63585ea0d

View File

@ -39,6 +39,8 @@
[() #'()]
[a #'a])))
;; Shorthand for adding new identifiers based on other formatted ones to
;; syntax patterns
(define-simple-macro (with-derived-ids ([pat-id:id format base-id-stx] ...) stx-expr)
(with-syntax ([pat-id
(format-id base-id-stx