aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-funsel.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-funsel.boot
parent245f4067091550d9d89bc25b5e2e8c95729354b7 (diff)
downloadopen-axiom-81bb06e3fd33bad7aae956b7742421159e2d0df9.tar.gz
More clean up on string vs symbol confusions
Diffstat (limited to 'src/interp/i-funsel.boot')
-rw-r--r--src/interp/i-funsel.boot6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/i-funsel.boot b/src/interp/i-funsel.boot
index daaa481d..166ab44b 100644
--- a/src/interp/i-funsel.boot
+++ b/src/interp/i-funsel.boot
@@ -43,7 +43,7 @@ sayFunctionSelection(op,args,target,dc,func) ==
fsig := formatSignatureArgs args
if not LISTP fsig then fsig := LIST fsig
if func then func := bright ['"by ",func]
- sayMSG concat ['%l,:bright '"Function Selection for",op,:func,'%l,
+ sayMSG concat ['"%l",:bright '"Function Selection for",op,:func,'"%l",
'" Arguments:",:bright fsig]
if target then sayMSG concat ['" Target type:",
:bright prefix2String target]
@@ -1050,7 +1050,7 @@ selectMmsGen(op,tar,args1,args2) ==
mmS := NIL
if $reportBottomUpFlag then
- sayMSG ['%l,:bright '"Modemaps from Associated Packages"]
+ sayMSG ['"%l",:bright '"Modemaps from Associated Packages"]
if haves then
[havesExact,havesInexact] := exact?(haves,tar,args1)
@@ -1068,7 +1068,7 @@ selectMmsGen(op,tar,args1,args2) ==
mmS => mmS
if $reportBottomUpFlag then
- sayMSG ['%l,:bright '"Remaining General Modemaps"]
+ sayMSG ['"%l",:bright '"Remaining General Modemaps"]
-- for mm in havenots for i in 1.. repeat sayModemapWithNumber(mm,i)
if havenots then