diff options
| author | alfredoport <doyenatccny@gmail.com> | 2008-08-04 00:04:33 +0000 |
|---|---|---|
| committer | alfredoport <doyenatccny@gmail.com> | 2008-08-04 00:04:33 +0000 |
| commit | e3b93676d2f4be3af64f7ab9fd215ed39ac999b1 (patch) | |
| tree | 0c2775a8ed9f0012a79afbabc6e6d942ada9aa1a /src | |
| parent | dd8f3bdf9d1cd00dc9794309a935f11eda4a83cc (diff) | |
| download | open-axiom-e3b93676d2f4be3af64f7ab9fd215ed39ac999b1.tar.gz | |
Fix bug SF 2034483
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/interp/format.boot | 4 | ||||
| -rw-r--r-- | src/interp/setvart.boot | 2 |
3 files changed, 10 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 76c338e2..d1cfdba5 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2008-08-03 Alfredo Portes <doyenatccny@gmail.com> + + * interp/setvart.boot: Fix wrong parenthesis. + * interp/format.boot: Add mathObject2String function. + 2008-08-03 Gabriel Dos Reis <gdr@cs.tamu.edu> * interp/sys-globals.boot ($compilingInputFile): Remove. 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 ----------------------- -- |