aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-output.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-output.boot')
-rw-r--r--src/interp/i-output.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-output.boot b/src/interp/i-output.boot
index 07059fd7..712a3005 100644
--- a/src/interp/i-output.boot
+++ b/src/interp/i-output.boot
@@ -2295,7 +2295,7 @@ matSub(x) ==
matWidth(x) ==
y := CDDR x -- list of rows, each of form ((ROW . w) element element ...)
numOfColumns := # CDAR y
- widthList := matLSum2 matWList(y, NLIST(numOfColumns, 0))
+ widthList := matLSum2 matWList(y, [0 for . in 1..numOfColumns])
--returns ["max width of entries in column i" for i in 1..numberOfRows]
subspanList := matLSum matSubList y
superspanList := matLSum matSuperList y