aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-spec1.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-12-12 23:01:18 +0000
committerdos-reis <gdr@axiomatics.org>2010-12-12 23:01:18 +0000
commit81bb06e3fd33bad7aae956b7742421159e2d0df9 (patch)
tree49cf3d97affb7841138c362e803bf4b654d19723 /src/interp/i-spec1.boot
parent245f4067091550d9d89bc25b5e2e8c95729354b7 (diff)
downloadopen-axiom-81bb06e3fd33bad7aae956b7742421159e2d0df9.tar.gz
More clean up on string vs symbol confusions
Diffstat (limited to 'src/interp/i-spec1.boot')
-rw-r--r--src/interp/i-spec1.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-spec1.boot b/src/interp/i-spec1.boot
index 7b260fd9..b308aa38 100644
--- a/src/interp/i-spec1.boot
+++ b/src/interp/i-spec1.boot
@@ -229,7 +229,7 @@ upAlgExtension t ==
clearDependencies(a,true)
if $printTypeIfTrue then
sayKeyedMsg("S2IS0003",NIL)
- sayMSG concat ['%l,'" ",saeTypeSynonym,'" := ",
+ sayMSG concat ['"%l",'" ",saeTypeSynonym,'" := ",
:prefix2String objVal saeTypeSynonymValue]
sayMSG concat ['" ",a,'" : ",saeTypeSynonym,'" := ",a]
putValue(op,T2)