Permalink
Browse files

Attempt to fix issue 27 about the syntax-rules implementation messing…

… up the difference between literals and pattern variables
  • Loading branch information...
1 parent 0cd4673 commit 7044d795a6f76b95f50b9186e199c2720b782b5a @per-gron per-gron committed Jun 14, 2010
Showing with 3 additions and 1 deletion.
  1. +3 −1 syntax-rules.scm
View
@@ -267,7 +267,9 @@
'())
((identifier? pattern)
- (list pattern))
+ (if (sc-memq env pattern literals)
+ '()
+ (list pattern)))
((pair? pattern)
(append (loop (car pattern))

0 comments on commit 7044d79

Please sign in to comment.