RosettaCodeData/Task/Time-a-function/Stata/time-a-function.stata

program timer_test
	timer clear 1
	timer on 1
	sleep `0'
	timer off 1
	timer list 1
end

. timer_test 1000
   1:      1.01 /        1 =       1.0140