Ticket #1811: patch

File patch, 427 bytes (added by rgherdt, 20 months ago)

Patch to bug involving 'environment' in scheme.eval.scm

  • scheme.eval.scm

     
    3131       (lambda ()
    3232         ;; create module...
    3333         (%eval `(module ,name ()
    34                    (import r7rs) ; for `import`
     34                   (import (only r7rs import))
    3535                   ,@(map (lambda (spec)
    3636                            `(import ,(fixup-import/export-spec spec 'environment)))
    3737                          specs)))