conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add strip-syntax

This commit is contained in:
Yuichi Nishiwaki 2014-07-26 14:13:12 +09:00
parent b4a0761eb3
commit e53472d9cc
2 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
docs/libs.rst
View File

@ -69,6 +69,7 @@ Syntactic closures.
- er-macro-transformer - er-macro-transformer
- ir-macro-transformer - ir-macro-transformer
- strip-syntax
Explicit renaming macro family. Explicit renaming macro family.

4
piclib/picrin/macro.scm
View File

@ -106,6 +106,9 @@
(rename sym))) (rename sym)))
(f (walk inject expr) inject compare)))) (f (walk inject expr) inject compare))))
(define (strip-syntax form)
(walk ungensym form))
(define-syntax define-macro (define-syntax define-macro
(er-macro-transformer (er-macro-transformer
(lambda (expr r c) (lambda (expr r c)
@ -127,4 +130,5 @@
rsc-macro-transformer rsc-macro-transformer
er-macro-transformer er-macro-transformer
ir-macro-transformer ir-macro-transformer
strip-syntax
define-macro)) define-macro))