aboutsummaryrefslogtreecommitdiff
path: root/src/interp/format.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-12-16 16:22:08 +0000
committerdos-reis <gdr@axiomatics.org>2008-12-16 16:22:08 +0000
commita03f68879f697998e2a3f41029a2034dc76767e0 (patch)
tree55d9bae7ff9aa4979da1567e0e1e6b49af5f92f0 /src/interp/format.boot
parentd338fac5f30034125dceaf6ab952018d8cba5a76 (diff)
downloadopen-axiom-a03f68879f697998e2a3f41029a2034dc76767e0.tar.gz
r12470@gauss: gdr | 2008-12-14 17:43:50 -0600
Forgot to commit ChangeLog. r12471@gauss: gdr | 2008-12-14 19:11:21 -0600 Fix typo in PrimitiveRatRicDE. r12472@gauss: gdr | 2008-12-15 01:40:45 -0600 Reformat preparse.lisp. r12473@gauss: gdr | 2008-12-15 03:25:17 -0600 Tidy. r12474@gauss: gdr | 2008-12-15 21:33:54 -0600 Remove unused codes. r12475@gauss: gdr | 2008-12-15 21:57:22 -0600 . r12476@gauss: gdr | 2008-12-15 23:07:49 -0600 Tidy fatal diagnostics. r12477@gauss: gdr | 2008-12-15 23:50:02 -0600 Fold iterator.boot into compiler.boot.
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