Comment 5 for bug 223362

Revision history for this message
Abdulaziz Ghuloum (aghuloum) wrote :

Now I fixed it (in revision 1453) BUT the examples you cited do not match because the lambda symbol is not an identifier and so it cannot be free-identifier=? with the lambda identifier listed in the literals lists. So, now you get:

Ikarus Scheme version 0.0.3+ (revision 1453, build 2008-04-28)
Copyright (c) 2006-2008 Abdulaziz Ghuloum

> (syntax-case '(lambda (x) x) (lambda) [(lambda (x) y) #'x])
Unhandled exception
 Condition components:
   1. &message: "invalid syntax"
   2. &syntax:
       form: (lambda (x) x)
       subform: #f
> (syntax-case '(lambda (x) x) (lambda) [(lambda (x) y) #'x] [_ 'nop!])
nop!
>