aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-data.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-data.boot')
-rw-r--r--src/interp/br-data.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-data.boot b/src/interp/br-data.boot
index 1014fbd0..45d947b1 100644
--- a/src/interp/br-data.boot
+++ b/src/interp/br-data.boot
@@ -463,7 +463,7 @@ getImports conname == --called by mkUsersHashTable
u := [doImport(i,template)
for i in 5..(maxIndex template) | test] where
test() == template.i is [op,:.] and ident? op
- and not (op in '(Mapping Union Record Enumeration CONS QUOTE local))
+ and not (op in '(Mapping Union Record Enumeration CONS QUOTE local %closure))
doImport(x,template) ==
x is [op,:args] =>
op = 'QUOTE or op = '%eval => first args