molt-shell 0.1.1

Molt Application Frameworks
Documentation
1
2
3
4
5
6
7
8
# Benchmark Library

# benchmark name description body ?count?
#
# Measures a benchmark, executing the body 1000 times.
proc benchmark {name description body {count 1000}} {
    measure $name $description [lindex [time $body $count] 0]
}