diff options
Diffstat (limited to 'src/interp/clam.boot')
| -rw-r--r-- | src/interp/clam.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/clam.boot b/src/interp/clam.boot index 5d1d5771..2adb438b 100644 --- a/src/interp/clam.boot +++ b/src/interp/clam.boot @@ -380,7 +380,7 @@ reportCircularCacheStats(fn,n) == infovec:= GETL(fn,'cacheInfo) circList:= eval infovec.cacheName numberUsed := - +/[1 for i in 1..n for x in circList while x isnt [='_$failed,:.]] + +/[1 for i in 1..n for x in circList while x isnt ['_$failed,:.]] sayBrightly ["%b",fn,"%d","has","%b",numberUsed,"%d","/ ",n," values cached"] displayCacheFrequency mkCircularCountAlist(circList,n) TERPRI() |