diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2012-06-12 21:51:41 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2012-06-12 21:51:41 +0300 |
commit | b4a2d75b7d9fd23069a55dc91a42f7fddd0c7570 (patch) | |
tree | b9f29b0ffb9930cf604d4e10c8c53af16062fafa /test/time.awk | |
parent | 21a01e3ad4e2e77dccf73e8fd069370749880757 (diff) | |
parent | 5472c2cc2889aab121c32ed4ca6bd831ae520d89 (diff) | |
download | egawk-b4a2d75b7d9fd23069a55dc91a42f7fddd0c7570.tar.gz egawk-b4a2d75b7d9fd23069a55dc91a42f7fddd0c7570.tar.bz2 egawk-b4a2d75b7d9fd23069a55dc91a42f7fddd0c7570.zip |
Merge branch 'extgawk' of ssh://git.sv.gnu.org/srv/git/gawk into extgawk
Diffstat (limited to 'test/time.awk')
-rw-r--r-- | test/time.awk | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/test/time.awk b/test/time.awk new file mode 100644 index 00000000..eeabc7bb --- /dev/null +++ b/test/time.awk @@ -0,0 +1,12 @@ +@load "time" + +BEGIN { + delta = 1.3 + printf "gettimeofday - systime = %d\n", (t0 = gettimeofday())-systime() + printf "sleep(%s) = %s\n",delta,sleep(delta) + printf "gettimeofday - systime = %d\n", (t1 = gettimeofday())-systime() + slept = t1-t0 + if ((slept < 0.9*delta) || (slept > 1.3*delta)) + printf "Warning: tried to sleep %.2f secs, but slept for %.2f secs\n", + delta,slept +} |