20 lines
566 B
Text
20 lines
566 B
Text
#!/usr/bin/env jsish
|
|
"use strict";
|
|
/* Rate counter, timer access, in Jsish */
|
|
|
|
/* System time in milliseconds */
|
|
var runs = 0, newMs;
|
|
function countJobsIsTheJob() { runs += 1; }
|
|
var milliSeconds = strptime();
|
|
while ((newMs = strptime()) < (milliSeconds + 1000)) { countJobsIsTheJob(); }
|
|
puts(runs, 'runs in', newMs - milliSeconds, 'ms');
|
|
|
|
|
|
/* Builtin times test(callback, runs), result in microseconds */
|
|
function sleeper() { sleep(10); }
|
|
|
|
var timer;
|
|
for (var i = 1; i < 4; i++) {
|
|
timer = times(sleeper, 100);
|
|
puts(timer, 'μs to sleep 10 ms, 100 times');
|
|
}
|