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.boot4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/interp/format.boot b/src/interp/format.boot
index 9550ebd5..252eb860 100644
--- a/src/interp/format.boot
+++ b/src/interp/format.boot
@@ -720,6 +720,10 @@ pred2English x ==
concat("attribute: ",form2String form)
form2String x
+mathObject2String x ==
+ CHARACTERP x => COERCE([x],'STRING)
+ object2String x
+
object2String x ==
STRINGP x => x
IDENTP x => PNAME x