time: Update docs and stack effect for 'benchmark'

db4
Eduardo Cavazos 2008-05-09 09:05:52 -05:00
parent fb605aadad
commit b1566be844
2 changed files with 3 additions and 2 deletions

View File

@ -14,7 +14,8 @@ ARTICLE: "timing" "Timing code"
ABOUT: "timing"
HELP: benchmark
{ $values { "quot" "a quotation" } { "gctime" "an integer denoting milliseconds" } { "runtime" "an integer denoting milliseconds" } }
{ $values { "quot" "a quotation" }
{ "runtime" "an integer denoting milliseconds" } }
{ $description "Runs a quotation, measuring the total wall clock time and the total time spent in the garbage collector." }
{ $notes "A nicer word for interactive use is " { $link time } "." } ;

View File

@ -4,7 +4,7 @@ USING: kernel math math.vectors memory io io.styles prettyprint
namespaces system sequences splitting assocs strings ;
IN: tools.time
: benchmark ( quot -- gctime runtime )
: benchmark ( quot -- runtime )
millis >r call millis r> - ; inline
: simple-table. ( values -- )