diff options
| author | dos-reis <gdr@axiomatics.org> | 2010-06-09 18:11:53 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2010-06-09 18:11:53 +0000 |
| commit | 9232685eacc1349c3930be22040f100935e8f6d9 (patch) | |
| tree | edb75a06ddd9a50f77a34d4aa6476c80e208fe84 /src/interp | |
| parent | 050ebc37a782f65ea7d305d32d79f1427057787f (diff) | |
| download | open-axiom-9232685eacc1349c3930be22040f100935e8f6d9.tar.gz | |
* interp/g-opt.boot (optCollectVector): Generare %collect form,
not COLLECT.
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/g-opt.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/g-opt.boot b/src/interp/g-opt.boot index dae16cde..af9fb966 100644 --- a/src/interp/g-opt.boot +++ b/src/interp/g-opt.boot @@ -591,7 +591,7 @@ optCollectVector form == systemErrorHere ["optCollectVector", iter] -- if we draw from a list, then just build a list and convert to vector. fromList => - ["homogeneousListToVector",["getVMType",eltType], ["COLLECT",:iters,body]] + ["homogeneousListToVector",["getVMType",eltType], ['%collect,:iters,body]] vecSize = nil => systemErrorHere ["optCollectVector",form] -- get the actual size of the vector. vecSize := |