From b655326d64f6b301873e427cf9e400c545029fec Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Fri, 27 Apr 2018 13:07:40 +0200 Subject: [PATCH 1/2] Do not patch up iexpressions with syntax environment Just like we noted in 097053f, iexpressions are just symbol->symbol mappings and never contain macros, so there is no need to patch up the syntax environments either. --- modules.scm | 5 ----- 1 file changed, 5 deletions(-) diff --git a/modules.scm b/modules.scm index f8a00553..e0240fbf 100644 --- a/modules.scm +++ b/modules.scm @@ -377,11 +377,6 @@ (set-car! (cdr sexp) (merge-se (or (cadr sexp) '()) senv))) sexps) (for-each - (lambda (iexp) - (when (pair? (cdr iexp)) - (set-car! (cdr iexp) (merge-se (or (cadr iexp) '()) senv)))) - iexports) - (for-each (lambda (nexp) (set-car! (cdr nexp) (merge-se (or (cadr nexp) '()) senv))) nexps) -- 2.11.0