tools.memory: update for language changes

db4
Slava Pestov 2009-10-30 03:15:07 -05:00
parent 6f9336c29e
commit f102d1073e
1 changed files with 2 additions and 2 deletions

View File

@ -181,8 +181,8 @@ TUPLE: gc-stats collections times ;
: aggregate-stats-table ( stats -- table ) : aggregate-stats-table ( stats -- table )
[ { "Total collections:" "Total GC time:" } ] dip [ { "Total collections:" "Total GC time:" } ] dip
values values
[ [ collections>> ] sigma ] [ [ collections>> ] map-sum ]
[ [ times>> sum ] sigma micros>string ] [ [ times>> sum ] map-sum micros>string ]
bi 2array zip ; bi 2array zip ;
PRIVATE> PRIVATE>