aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nruncomp.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-05-19 02:28:08 +0000
committerdos-reis <gdr@axiomatics.org>2011-05-19 02:28:08 +0000
commit2f97f0a378ac0663d14f1e4e5a8df6c3d824fdd6 (patch)
tree756dc891b84576b3697a1d636e908328afb7719b /src/interp/nruncomp.boot
parentaf7a143e3a13e932e243165814fa40424507dae0 (diff)
downloadopen-axiom-2f97f0a378ac0663d14f1e4e5a8df6c3d824fdd6.tar.gz
more cleanup
Diffstat (limited to 'src/interp/nruncomp.boot')
-rw-r--r--src/interp/nruncomp.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot
index 7dcde37c..746a7067 100644
--- a/src/interp/nruncomp.boot
+++ b/src/interp/nruncomp.boot
@@ -496,7 +496,7 @@ buildFunctor($definition is [name,:args],sig,code,$locals,$e) ==
-- indicating under what conditions this
-- category should be present. true => always
makeCatvecCode:= first catvecListMaker
- emptyVector := VECTOR()
+ emptyVector := vector []
domainShell := newShell($NRTbase + $NRTdeltaLength)
for i in 0..4 repeat
vectorRef(domainShell,i) := vectorRef($domainShell,i)