diff --git a/lib/chibi/modules.scm b/lib/chibi/modules.scm
index c1d1ead3..02bb2a31 100644
--- a/lib/chibi/modules.scm
+++ b/lib/chibi/modules.scm
@@ -125,7 +125,7 @@
   (let lp1 ((ls (reverse *modules*)))
     (and (pair? ls)
          (let ((env (module-env (cdar ls))))
-           (let lp2 ((e-ls (env-exports env)))
+           (let lp2 ((e-ls (if (environment? env) (env-exports env) '())))
              (if (null? e-ls)
                  (lp1 (cdr ls))
                  (let ((cell (env-cell env (car e-ls))))