Welcome to the CHICKEN Scheme pasting service

module-environment fix added by C-Keen on Sat Sep 29 01:42:06 2012

$ git diff
diff --git a/modules.scm b/modules.scm
index b1571c2..29566f2 100644
--- a/modules.scm
+++ b/modules.scm
@@ -911,4 +911,4 @@
 (define (module-environment mname #!optional (ename mname))
   (let* ((mod (##sys#find-module/import-library mname 'module-environment))
         (saved (module-saved-environments mod)))
-    (##sys#make-structure 'environment ename (car saved) #t)))
+    (##sys#make-structure 'environment ename (and saved (car saved)) #t)))
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
`call/cc' is a short name for which procedure?
Visually impaired? Let me spell it for you (wav file) download WAV