aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compiler.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/compiler.boot')
-rw-r--r--src/interp/compiler.boot4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot
index 49aa460a..132ab160 100644
--- a/src/interp/compiler.boot
+++ b/src/interp/compiler.boot
@@ -1333,7 +1333,9 @@ compFromIf(a,m,E) ==
compImport: (%Form,%Mode,%Env) -> %Triple
compImport(["import",:doms],m,e) ==
- for dom in doms repeat e:=addDomain(dom,e)
+ if not $bootStrapMode then
+ for dom in doms repeat
+ e := addDomain(dom,e)
["/throwAway",$NoValueMode,e]
--% Foreign Function Interface