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

Types that can be passed to the rename procedure is only a symbol

This commit is contained in:
Yuichi Nishiwaki 2014-01-11 12:55:34 +09:00
parent 45c49fdec3
commit c66a217e87
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
piclib/built-in.scm
View File

@ -245,9 +245,9 @@
(er-macro-transformer (er-macro-transformer
(lambda (expr r c) (lambda (expr r c)
`(,(r 'define-syntax) ,(cadr expr) `(,(r 'define-syntax) ,(cadr expr)
,(r '(sc-macro-transformer (,(r 'sc-macro-transformer)
(lambda (expr env) (,(r 'lambda) (expr env)
(error "invalid use of auxiliary syntax")))))))) (,(r 'error) "invalid use of auxiliary syntax")))))))
(define-auxiliary-syntax else) (define-auxiliary-syntax else)
(define-auxiliary-syntax =>) (define-auxiliary-syntax =>)