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

[bugfix] abuse compare of er-macro

This commit is contained in:
Yuichi Nishiwaki 2014-07-17 16:11:33 +09:00
parent 6104a69e2b
commit 5b41b979d9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
piclib/built-in.scm
View File

@ -1418,7 +1418,7 @@
(define (compile-expand ellipsis reserved template)
(letrec ((compile-expand-base
(lambda (template ellipsis-valid)
(cond ((member template reserved compare)
(cond ((member template reserved eq?)
(values (var->sym template) (list template)))
((symbol? template)
(values `(rename ',template) '()))