int
main (int argc, char *argv[])
{
word i, n = atoi (argv[1]);
word run_foo = argc > 2;
bar_t b = { limit:10 };
if (run_foo)
{
f64 time_limit;
time_limit = atof (argv[2]);
vec_resize (foos, n);
for (i = 0; i < n; i++)
{
foos[i].time_requested = time_limit * random_f64 ();
foos[i].time_called = 1e100;
}
foo_base_time = unix_time_now ();
for (i = 0; i < n; i++)
timer_call (foo, i, foos[i].time_requested);
}
else
timer_call (bar, (any) & b, random_f64 ());
while (vec_len (timers) > 0)
os_sched_yield ();
if (vec_len (foos) > 0)
{
f64 min = 1e100, max = -min;
f64 ave = 0, rms = 0;
for (i = 0; i < n; i++)
{
f64 dt = foos[i].time_requested - foos[i].time_called;
if (dt < min)
min = dt;
if (dt > max)
max = dt;
ave += dt;
rms += dt * dt;
}
ave /= n;
rms = sqrt (rms / n - ave * ave);
fformat (stdout, "error min %g max %g ave %g +- %g\n", min, max, ave,
rms);
}
fformat (stdout, "%d function calls, ave. timer delay %g secs\n",
ave_delay_count, ave_delay / ave_delay_count);
return 0;
}
void bar (any arg, f64 delay)
{
bar_t * b = (bar_t *) arg;
fformat (stdout, "bar %d delay %g\n", b->count++, delay);
update (delay);
if (b->count < b->limit)
timer_call (bar, arg, random_f64 ());
}
