RosettaCodeData/Task/Rate-counter/Jsish/rate-counter.jsish

21 lines
566 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
#!/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');
}