Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-08 13:37:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Fixing bug in "no expansion" error handling for syntax-rules.

Browse source
This commit is contained in:
Alex Shinn 2012-03-07 07:05:18 +09:00
parent 5a803b2411
commit bbe56ad069
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/init-7.scm
View file

@ -815,10 +815,11 @@
(map (map
(lambda (clause) (expand-pattern (car clause) (cadr clause))) (lambda (clause) (expand-pattern (car clause) (cadr clause)))
forms) forms)
(list
(list _cons (list _cons
(list _error "no expansion for" (list _error "no expansion for"
(list (rename 'strip-syntactic-closures) _expr)) (list (rename 'strip-syntactic-closures) _expr))
#f)))))))))) #f)))))))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; additional syntax ;; additional syntax