|
Packit Service |
f629e6 |
@load "time"
|
|
Packit Service |
f629e6 |
|
|
Packit Service |
f629e6 |
# make sure gettimeofday() is consistent with systime(). We must call
|
|
Packit Service |
f629e6 |
# gettimeofday() before systime() to make sure the subtraction gives 0
|
|
Packit Service |
f629e6 |
# without risk of rolling over to the next second.
|
|
Packit Service |
f629e6 |
function timecheck(st,res) {
|
|
Packit Service |
f629e6 |
res = gettimeofday()
|
|
Packit Service |
f629e6 |
st = systime()
|
|
Packit Service |
f629e6 |
printf "gettimeofday - systime = %d\n", res-st
|
|
Packit Service |
f629e6 |
return res
|
|
Packit Service |
f629e6 |
}
|
|
Packit Service |
f629e6 |
|
|
Packit Service |
f629e6 |
BEGIN {
|
|
Packit Service |
f629e6 |
delta = 1.3
|
|
Packit Service |
f629e6 |
t0 = timecheck()
|
|
Packit Service |
f629e6 |
printf "sleep(%s) = %s\n",delta,sleep(delta)
|
|
Packit Service |
f629e6 |
t1 = timecheck()
|
|
Packit Service |
f629e6 |
slept = t1-t0
|
|
Packit Service |
f629e6 |
if ((slept < 0.9*delta) || (slept > 1.3*delta))
|
|
Packit Service |
f629e6 |
printf "Warning: tried to sleep %.2f secs, but slept for %.2f secs\n",
|
|
Packit Service |
f629e6 |
delta,slept
|
|
Packit Service |
f629e6 |
}
|