tools.time: fix load error in docs

db4
Slava Pestov 2010-03-16 16:44:36 +13:00
parent 10836ce1bc
commit 9b6b58b240
2 changed files with 3 additions and 3 deletions

View File

@ -17,7 +17,7 @@ SYMBOL: last-dispatch-stats
{ "Tuple check count" [ pic-tuple-count>> ] } { "Tuple check count" [ pic-tuple-count>> ] }
} object-table. ; } object-table. ;
: collect-dispatch-stats ( quot -- dispatch-stats ) : collect-dispatch-stats ( quot -- dispatch-statistics )
reset-dispatch-stats reset-dispatch-stats
call call
dispatch-stats dispatch-statistics memory>struct ; inline dispatch-stats dispatch-statistics memory>struct ; inline

View File

@ -32,6 +32,6 @@ HELP: collect-gc-events
{ $notes "The " { $link time } " combinator automatically calls this combinator." } ; { $notes "The " { $link time } " combinator automatically calls this combinator." } ;
HELP: collect-dispatch-stats HELP: collect-dispatch-stats
{ $values { "quot" quotation } { "dispatch-stats" dispatch-stats } } { $values { "quot" quotation } { "dispatch-statistics" dispatch-statistics } }
{ $description "Calls the quotation and outputs a " { $link dispatch-stats } " instance." } { $description "Calls the quotation and outputs a " { $link dispatch-statistics } " instance." }
{ $notes "The " { $link time } " combinator automatically calls this combinator." } ; { $notes "The " { $link time } " combinator automatically calls this combinator." } ;