aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-util.boot')
-rw-r--r--src/interp/i-util.boot5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/interp/i-util.boot b/src/interp/i-util.boot
index 32b134ff..c55a3a5e 100644
--- a/src/interp/i-util.boot
+++ b/src/interp/i-util.boot
@@ -94,8 +94,9 @@ textEditor() ==
$ZeroVecCache := nil
Zeros n ==
#$ZeroVecCache = n => $ZeroVecCache
- $ZeroVecCache := MAKE_-VEC n
- for i in 0..n-1 repeat $ZeroVecCache.i:=0
+ $ZeroVecCache := newVector n
+ for i in 0..n-1 repeat
+ $ZeroVecCache.i := 0
$ZeroVecCache
LZeros n ==