Welcome to the CHICKEN Scheme pasting service
environments added by andyjpb on Thu Jul 19 17:27:09 2012
#;1> (use environments) ; loading /usr/local/chicken-4.7.0/lib/chicken/6/environments.import.so ... ; loading /usr/local/chicken-4.7.0/lib/chicken/6/environments.so ... #;2> (environment-includes? (interaction-environment) 'name) #f #;3> (define widget-eval-env (make-parameter (environment-copy (interaction-environment) #t))) #;4> (define env (environment-copy (widget-eval-env) #t)) #;5> env #<environment> #;6> (environment-includes? env 'name) #t #;7> ^D