nit
This commit is contained in:
parent
44305eb770
commit
cb0c24c293
|
@ -252,7 +252,7 @@
|
||||||
#'(define-syntax (_id stx)
|
#'(define-syntax (_id stx)
|
||||||
(syntax-case stx ()
|
(syntax-case stx ()
|
||||||
[(_id . rest)
|
[(_id . rest)
|
||||||
(let* ([expanded-stx (with-syntax ([expanded-macros (map expand-macro (syntax->list #'rest))])
|
(let ([expanded-stx (with-syntax ([expanded-macros (map expand-macro (syntax->list #'rest))])
|
||||||
#'(_id . expanded-macros))])
|
#'(_id . expanded-macros))])
|
||||||
(define result
|
(define result
|
||||||
(syntax-case expanded-stx LITERALS
|
(syntax-case expanded-stx LITERALS
|
||||||
|
|
Loading…
Reference in New Issue
Block a user