Re: Closure, syntax and load ...

[Miroslav Silovic]

Manuel Giraud <address@hidden> writes:

> Here is the first version :

At this point, I took a liberty of properly indenting your file:

;;; foo.scm

(use-syntax (ice-9 syncase))
(define f 0)
(let ()
  (define square
    (lambda (x)
      (* x x)))
  (define-syntax foo
    (lambda (x)
      (syntax-case x ()
                   ((_ a)
                    (syntax (square a))))))
  (set! f (foo 6)))

It's obvious that foo is defined within let and isn't visible outside
foo.scm (or, for that matter, outside let itself). You might want to
do this:

(use-syntax (ice-9 syncase))
(define f 0)
(define-syntax foo
  (lambda (x)
    (syntax-case x ()
                 ((_ a)
                  (syntax (square a))))))
(let ()
  (define square
    (lambda (x)
      (* x x)))
  (set! f (foo 6)))

-- 
How to eff the ineffable?