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 ca24779d..2723e7d6 100644
--- a/src/interp/i-output.boot
+++ b/src/interp/i-output.boot
@@ -1195,7 +1195,7 @@ LargeMatrixp(u,width, dist) ==
op:=CAAR u
op = 'MATRIX => largeMatrixAlist u
--We already know the structure is more than 'width' wide
- MEMQ(op,'(LET RARROW SEGMENT _- CONCAT CONCATB PAREN BRACKET BRACE)) =>
+ MEMQ(op,'(%LET RARROW SEGMENT _- CONCAT CONCATB PAREN BRACKET BRACE)) =>
--Each of these prints the arguments in a width 3 smaller
dist:=dist-3
width:=width-3