Home
last modified time | relevance | path

Searched refs:HiRes (Results 1 – 25 of 112) sorted by relevance

12345

/openbsd/gnu/usr.bin/perl/dist/Time-HiRes/t/
H A Ditimer.t5 eval "use Time::HiRes qw($symbol)";
14 require Time::HiRes;
15 unless(defined &Time::HiRes::setitimer
35 my $r = [Time::HiRes::gettimeofday()];
38 $i ? $i-- : Time::HiRes::setitimer(&Time::HiRes::ITIMER_VIRTUAL, 0);
43 Time::HiRes::setitimer(&Time::HiRes::ITIMER_VIRTUAL, 0.5, 0.4)));
46 my $virt = Time::HiRes::getitimer(&Time::HiRes::ITIMER_VIRTUAL);
52 Time::HiRes::getitimer(&Time::HiRes::ITIMER_VIRTUAL)));
56 while ((Time::HiRes::getitimer(&Time::HiRes::ITIMER_VIRTUAL))[1]) {
62 Time::HiRes::getitimer(&Time::HiRes::ITIMER_VIRTUAL)));
[all …]
H A Dusleep.t4 require Time::HiRes;
5 unless(&Time::HiRes::d_usleep) {
15 eval { Time::HiRes::usleep(-2) };
22 Time::HiRes::usleep(10_000);
24 Time::HiRes::usleep(10_000);
31 my $f = Time::HiRes::time();
32 Time::HiRes::usleep(500_000);
33 my $f2 = Time::HiRes::time();
41 Time::HiRes::sleep( 0.5 );
54 $t0 = Time::HiRes::gettimeofday();
[all …]
H A Dutime.t5 require Time::HiRes;
19 Time::HiRes::sleep(.1) if $_ == 1;
32 require Time::HiRes;
93 require Time::HiRes;
96 unless(&Time::HiRes::d_hires_utime) {
99 unless(&Time::HiRes::d_hires_stat) {
104 unless (&Time::HiRes::d_futimens) {
107 unless (&Time::HiRes::d_utimensat) {
214 my $now = Time::HiRes::time;
238 eval { Time::HiRes::utime(-4, $mtime) };
[all …]
H A Dclock.t7 BEGIN { require_ok "Time::HiRes"; }
11 eval "use Time::HiRes qw($symbol)";
20 printf("# have_clock = %d\n", &Time::HiRes::d_clock);
41 my $t0 = Time::HiRes::clock_gettime(&CLOCK_REALTIME);
43 Time::HiRes::sleep($T);
59 Time::HiRes::sleep($r);
67 my $tr = Time::HiRes::clock_getres();
75 my $t = Time::HiRes::clock_nanosleep(&CLOCK_REALTIME, $s);
81 skip "no clock", 1 unless &Time::HiRes::d_clock;
83 my @clock = Time::HiRes::clock();
[all …]
H A Dalarm.t7 BEGIN { require_ok "Time::HiRes"; }
20 defined &Time::HiRes::gettimeofday &&
21 defined &Time::HiRes::ualarm &&
22 defined &Time::HiRes::usleep &&
35 $r = [Time::HiRes::gettimeofday()];
62 Time::HiRes::alarm(0.3);
121 eval { Time::HiRes::alarm(-3) };
195 Time::HiRes::alarm(0.1);
196 my $t0 = Time::HiRes::time();
203 Time::HiRes::alarm(1.1);
[all …]
H A Dualarm.t4 require Time::HiRes;
5 unless(&Time::HiRes::d_ualarm) {
33 Time::HiRes::ualarm(0);
37 eval { Time::HiRes::ualarm(-4) };
62 my $t0 = Time::HiRes::time();
66 my $t1 = Time::HiRes::time();
78 Time::HiRes::sleep($nap);
87 my $t0 = Time::HiRes::time();
93 $t1 = Time::HiRes::time();
95 my $got1 = Time::HiRes::ualarm(0);
[all …]
H A Dsleep.t7 BEGIN { require_ok "Time::HiRes"; }
18 defined &Time::HiRes::gettimeofday &&
19 defined &Time::HiRes::ualarm &&
20 defined &Time::HiRes::usleep &&
23 eval { Time::HiRes::sleep(-1) };
29 my $f = Time::HiRes::time;
33 my $r = [Time::HiRes::gettimeofday()];
34 Time::HiRes::sleep (0.5);
35 printf("# sleep...%s\n", Time::HiRes::tv_interval($r));
H A Dnanosleep.t4 require Time::HiRes;
5 unless(&Time::HiRes::d_nanosleep) {
15 eval { Time::HiRes::nanosleep(-5) };
20 Time::HiRes::nanosleep(10_000_000);
22 Time::HiRes::nanosleep(10_000_000);
28 skip "no gettimeofday", 2 unless &Time::HiRes::d_gettimeofday;
29 my $f = Time::HiRes::time();
30 Time::HiRes::nanosleep(500_000_000);
31 my $f2 = Time::HiRes::time();
H A Dstat.t4 require Time::HiRes;
5 unless(&Time::HiRes::d_hires_stat) {
24 Time::HiRes::sleep(rand(0.1) + 0.1);
45 Time::HiRes::sleep(rand(0.1) + 0.1);
49 $stat = [Time::HiRes::stat($$)];
51 $lstat = [Time::HiRes::lstat($$)];
96 note "compare Time::HiRes::stat with ::lstat";
97 my @tgt_stat = Time::HiRes::stat($targetname);
98 my @tgt_lstat = Time::HiRes::lstat($targetname);
99 my @lnk_stat = Time::HiRes::stat($linkname);
[all …]
H A Dgettimeofday.t4 require Time::HiRes;
5 unless(&Time::HiRes::d_gettimeofday) {
15 my @one = Time::HiRes::gettimeofday();
22 my @two = Time::HiRes::gettimeofday();
26 my $f = Time::HiRes::time();
30 my $r = [Time::HiRes::gettimeofday()];
31 my $g = Time::HiRes::tv_interval $r;
H A Dtime.t7 BEGIN { require_ok "Time::HiRes"; }
10 skip "no gettimeofday", 1 unless &Time::HiRes::d_gettimeofday;
13 $s += Time::HiRes::time() - CORE::time();
20 or print("# Time::HiRes::time() not close to CORE::time()\n");
H A Dtv_interval.t5 BEGIN { require_ok "Time::HiRes"; }
7 my $f = Time::HiRes::tv_interval [5, 100_000], [10, 500_000];
/openbsd/gnu/usr.bin/perl/t/io/
H A Deintr_print.t18 use Time::HiRes;
25 unless Time::HiRes::d_ualarm();
27 unless Time::HiRes::d_usleep();
61 Time::HiRes::usleep $big_delay;
64 Time::HiRes::ualarm($fail_delay);
76 Time::HiRes::ualarm(0);
85 Time::HiRes::ualarm($small_delay); # and when it block we'll get SIGALRM
88 Time::HiRes::ualarm(0);
90 Time::HiRes::usleep(500_000);
/openbsd/gnu/usr.bin/perl/dist/Time-HiRes/
H A DChanges1 Revision history for the Perl extension Time::HiRes.
452 - t/HiRes.t failed in Perl 5.6.2,
555 use Time::HiRes;
556 my @stat = Time::HiRes::stat();
560 use Time::HiRes qw(stat);
693 - a redundant test guard in HiRes.t
745 - add copyright 2005 to HiRes.pm
1123 - move HiRes.pm to lib/Time/
1124 - move HiRes.t to t/
1176 Time::HiRes::time() are close.
[all …]
H A DHiRes.pm1 package Time::HiRes;
91 Time::HiRes->export_to_level(1, $this, @_);
/openbsd/gnu/usr.bin/perl/t/op/
H A Dsigsystem.t19 require Time::HiRes;
31 Time::HiRes::sleep(0.250);
47 Time::HiRes::sleep(0.500);
/openbsd/gnu/usr.bin/perl/dist/Net-Ping/t/
H A D250_ping_hires.t15 unless (eval "require Time::HiRes") {
16 print "1..0 \# Skip: no Time::HiRes\n";
36 is($Net::Ping::hires, 1, 'Default is to use Time::HiRes');
57 # point if Time::HiRes is functioning properly, except when it
/openbsd/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/
H A DMM.pm21 *mtime = (eval { require Time::HiRes } && defined &Time::HiRes::stat)
22 ? sub { (Time::HiRes::stat($_[0]))[9] }
/openbsd/gnu/usr.bin/perl/dist/Time-HiRes/fallback/
H A Dconst-xs.inc26 sv_2mortal(newSVpvf("%s is not a valid Time::HiRes macro", s));
31 "Your vendor has not defined Time::HiRes macro %s, used",
87 "Unexpected return type %d while processing Time::HiRes macro %s, used",
/openbsd/gnu/usr.bin/perl/cpan/IPC-Cmd/lib/IPC/
H A DCmd.pm38 require Time::HiRes; Time::HiRes->import();
44 my $wait_start_time = Time::HiRes::clock_gettime(&Time::HiRes::CLOCK_MONOTONIC);
371 return Time::HiRes::clock_gettime(&Time::HiRes::CLOCK_MONOTONIC);
510 Time::HiRes::usleep(250000); # quarter of a second
535 Time::HiRes::usleep(1) if IS_HPUX;
671 Time::HiRes::usleep(1);
1112 Time::HiRes::usleep(1);
/openbsd/gnu/usr.bin/perl/cpan/Memoize/Memoize/
H A DExpire.pm15 eval {require Time::HiRes};
17 Time::HiRes->import('time');
/openbsd/gnu/usr.bin/perl/plan9/
H A Dmkfile54 …evel::Peek attributes Hash::Util Hash::Util::FieldHash mro Storable Time::HiRes Unicode::Normalize…
55 … re.xs B.xs Peek.xs attributes.xs Util.xs FieldHash.xs mro.xs Storable.xs HiRes.xs Normalize.xs Li…
204 HiRes.$O: extensions
205 $XSCCCMD -I plan9 -I. HiRes.c
279 HiRes.c: archlib/Config.pm dist/Time-HiRes/HiRes.xs
280 cd dist/Time-HiRes
283 $miniperlxs dist/Time-HiRes/HiRes.xs > $target
285 cp dist/Time-HiRes/HiRes.pm archlib/Time
/openbsd/gnu/usr.bin/perl/cpan/Test2-Suite/lib/Test2/
H A DAsyncSubtest.pm20 use Time::HiRes();
268 $self->{+START_STAMP} = Time::HiRes::time() unless defined $self->{+START_STAMP};
289 $self->{+STOP_STAMP} = Time::HiRes::time();
315 $self->{+STOP_STAMP} = Time::HiRes::time() unless defined $self->{+STOP_STAMP};
411 Time::HiRes::sleep('0.01');
/openbsd/gnu/usr.bin/perl/ext/POSIX/t/
H A Dwaitpid.t12 eval 'use Time::HiRes qw(time)';
14 print "1..0 # Skip: no Time::HiRes\n";
/openbsd/regress/sys/kern/sosplice/tcp/
H A Dargs-relay-write-forked.pl6 use Time::HiRes;

12345