search

chazu / ypsilon

Automatically exported from code.google.com/p/ypsilon
Other
0 stars 1 forks source link

Issue with free-identifier? #29

Closed GoogleCodeExporter closed 9 years ago

GoogleCodeExporter commented 9 years ago 
The following works with ypsilon, but it should fail:

(import (rnrs))

(define-syntax foo
  (lambda (x)
    (define (bar-foo x)
      (syntax-case x (bar)
        [(bar n . e) #'#f]))
    (define bar)
    (syntax-case x ()
      [(_ (bars ...))
        #`(list . #,(map bar-foo #'(bars ...)))])))

(foo ((bar hey)))

More details:
https://bugs.launchpad.net/ikarus/+bug/248476

Original issue reported on code.google.com by xacc....@gmail.com on 15 Jul 2008 at 8:13

GoogleCodeExporter commented 9 years ago 
Thank you for your bug report and valuable information!

Original comment by y.fujita...@gmail.com on 15 Jul 2008 at 1:22

GoogleCodeExporter commented 9 years ago 
I have fixed the bug and trunk directory is updated. Please try.
Thank you!

Original comment by y.fujita...@gmail.com on 17 Jul 2008 at 1:05