This is the mail archive of the guile@cygnus.com mailing list for the guile project.

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]

dynamic Bindings

Hi,

is there a way to get dynamic bindings in Guile to make this code
printing "local"?

(define doit (lambda () (display "global\n")))

(define some-code '(doit))

(define (dynamic code)
  (let ((doit (lambda () display "local\n")))
    (eval code)))

(dynamic some-code)