ocaml/tools/Time

13 lines
295 B
Plaintext
Raw Normal View History

# Time # Measure execution time
# Usage: Time command arguments<74>
set echo 0
set startdate `date -n`
{parameters}
set enddate `date -n`
echo -n '# Time: ' >dev:stderr
echo "`evaluate ( {enddate} - {startdate} ) <20> 60`mn" <20>
"`evaluate ( {enddate} - {startdate} ) % 60`s" > dev:stderr