diff options
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/format.boot | 4 | ||||
| -rw-r--r-- | src/interp/setvart.boot | 2 |
2 files changed, 5 insertions, 1 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 diff --git a/src/interp/setvart.boot b/src/interp/setvart.boot index de85d43e..39a5e304 100644 --- a/src/interp/setvart.boot +++ b/src/interp/setvart.boot @@ -1501,7 +1501,6 @@ $setOptions := '( chkOutputFileName "console")) NIL) - )) -- ----------------------- The mathml Option ------------------------ -- @@ -1550,6 +1549,7 @@ $setOptions := '( chkOutputFileName "console")) NIL) + )) -- ----------------------- The quit Option ----------------------- -- |