diff options
Diffstat (limited to 'src/interp/clam.boot')
-rw-r--r-- | src/interp/clam.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/clam.boot b/src/interp/clam.boot index 2adb438b..db2ad360 100644 --- a/src/interp/clam.boot +++ b/src/interp/clam.boot @@ -365,7 +365,7 @@ clearCategoryCache catName == displayHashtable x == l:= nreverse SORTBY('CAR,[[opOf HGET(x,key),key] for key in HKEYS x]) for [a,b] in l repeat - sayBrightlyNT ['%b,a,'%d] + sayBrightlyNT ['"%b",a,'"%d"] pp b cacheStats() == @@ -704,5 +704,5 @@ domainEqualList(argl1,argl2) == removeAllClams() == for [fun,:.] in $clamList repeat - sayBrightly ['"Un-clamming function",'%b,fun,'%d] + sayBrightly ['"Un-clamming function",'"%b",fun,'"%d"] setDynamicBinding(fun,eval INTERN strconc(STRINGIMAGE fun,'";")) |