aboutsummaryrefslogtreecommitdiff
path: root/src/interp/define.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/define.boot')
-rw-r--r--src/interp/define.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot
index 50911353..8d249ab5 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -933,7 +933,7 @@ compDefineFunctor1(df is ['DEF,form,signature,nils,body],
stackAndThrow('" cannot produce category object: %1pb",[target])
$compileExportsOnly =>
compDefineExports(form, categoryExports ds, signature',$e)
- $domainShell: local := COPY_-SEQ ds
+ $domainShell: local := copyVector ds
attributeList := vectorRef(ds,2) --see below under "loadTimeAlist"
$condAlist: local := nil
$uncondAlist: local := nil