diff options
| author | dos-reis <gdr@axiomatics.org> | 2010-06-10 02:53:03 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2010-06-10 02:53:03 +0000 |
| commit | 065a1bd3b0facc445cccd066b47a1801abd6f0aa (patch) | |
| tree | c27c02c0c0dd7a4f343bdb39101806798ab798cb /src/interp/compiler.boot | |
| parent | 9232685eacc1349c3930be22040f100935e8f6d9 (diff) | |
| download | open-axiom-065a1bd3b0facc445cccd066b47a1801abd6f0aa.tar.gz | |
Clean up
Diffstat (limited to 'src/interp/compiler.boot')
| -rw-r--r-- | src/interp/compiler.boot | 2 |
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'] |