steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

vocabs-profile. now omits type predicates

db4
sheeple 2008-02-15 14:16:45 -06:00
parent be9989cf3d
commit 9faee652c8
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/tools/profiler/profiler.factor
View File

@ -59,5 +59,7 @@ M: string (profile.)
: vocabs-profile. ( -- ) : vocabs-profile. ( -- )
"Call counts for all vocabularies:" print "Call counts for all vocabularies:" print
vocabs [ vocabs [
dup words [ profile-counter ] map sum dup words
[ "predicating" word-prop not ] subset
[ profile-counter ] map sum
] { } map>assoc counters. ; ] { } map>assoc counters. ;