aboutsummaryrefslogtreecommitdiff
path: root/src/interp/format.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/format.boot')
-rw-r--r--src/interp/format.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/format.boot b/src/interp/format.boot
index 64414ea6..d3d6fbc9 100644
--- a/src/interp/format.boot
+++ b/src/interp/format.boot
@@ -535,7 +535,7 @@ formIterator2String x ==
x is ["|",y,p] => concat(formatIterator y," | ",form2StringLocal p)
x is ["until",p] => concat("until ",form2StringLocal p)
x is ["while",p] => concat("while ",form2StringLocal p)
- systemErrorHere "formatIterator"
+ systemErrorHere ["formatIterator",x]
tuple2String argl ==
null argl => nil