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.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot
index 7ac0ce3e..a9e29dea 100644
--- a/src/interp/compiler.boot
+++ b/src/interp/compiler.boot
@@ -2304,7 +2304,7 @@ compRepeatOrCollect(form,m,e) ==
repeatOrCollect = "%CollectV" =>
["%CollectV",localReferenceIfThere m',:itl',body']
-- We are phasing out use of LISP macros COLLECT and REPEAT.
- repeatOrCollect = "COLLECT" => ["%collect",:itl',body']
+ repeatOrCollect = "COLLECT" => ['%collect,:itl',body']
[repeatOrCollect,:itl',body']
m'' :=
aggr is [c,.] and c in '(List PrimitiveArray Vector) => [c,m']