/openbsd/gnu/usr.bin/perl/dist/Time-HiRes/t/ |
H A D | itimer.t | 5 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 D | usleep.t | 4 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 D | utime.t | 5 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 D | clock.t | 7 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 D | alarm.t | 7 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 D | ualarm.t | 4 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 D | sleep.t | 7 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 D | nanosleep.t | 4 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 D | stat.t | 4 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 D | gettimeofday.t | 4 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 D | time.t | 7 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");
|
/openbsd/gnu/usr.bin/perl/cpan/Time-Piece/t/ |
H A D | 01base.t | 3 BEGIN { use_ok('Time::Piece'); } 7 isa_ok($t, 'Time::Piece', 'specific gmtime'); 16 isa_ok($g, 'Time::Piece', 'current gmtime'); 19 isa_ok($l, 'Time::Piece', 'current localtime'); 22 $g = Time::Piece::gmtime; 23 isa_ok($g, 'Time::Piece', 'fully qualified gmtime'); 25 $l = Time::Piece::localtime; 26 isa_ok($l, 'Time::Piece', 'full qualified localtime'); 29 $l = Time::Piece->new(315532800); 37 my $l_clone = Time::Piece->new($l); [all …]
|
H A D | 02core.t | 7 use Time::Piece; 8 use Time::Seconds; 154 my @nmdays = Time::Piece::day_list(); 184 ok(!Time::Piece::_is_leap_year(1900)); 186 ok(!Time::Piece::_is_leap_year(1901)); 188 ok(Time::Piece::_is_leap_year(1904)); 223 my $s = Time::Seconds->new(-691050); 226 $s = Time::Seconds->new(-90061); 229 $s = Time::Seconds->new(10); 231 $s = Time::Seconds->new(130); [all …]
|
H A D | 07arith.t | 3 BEGIN { use_ok('Time::Piece'); use_ok('Time::Seconds'); } 28 $t = Time::Piece->strptime("01 01 2010","%d %m %Y"); 52 # Tests for Time::Seconds start here 62 is($s2->minutes, 44640, 'Copy Time::Seconds object'); 64 is($s2->minutes, 44641, 'Add integer to Time::Seconds object'); 68 is($s2->minutes, 89402, 'Add one Time::Seconds object to another'); 74 $s2 = Time::Seconds->new(); 75 is($s2->seconds, 0, 'Empty Time::Seconds constructor is 0s'); 76 my $s3 = Time::Seconds->new(10); 78 is($s2->seconds, 10, 'Add 2 Time::Seconds objects'); [all …]
|
H A D | 09locales.t | 2 use Time::Piece; 13 &Time::Piece::_default_locale(); 18 cmp_ok( $t->monname, 'eq', &Time::Piece::_locale()->{mon}[ $t->_mon ] ); 19 cmp_ok( $t->month, 'eq', &Time::Piece::_locale()->{mon}[ $t->_mon ] ); 20 cmp_ok( $t->fullmonth, 'eq', &Time::Piece::_locale()->{month}[ $t->_mon ] ); 23 cmp_ok( $t->wdayname, 'eq', &Time::Piece::_locale()->{wday}[ $t->_wday ] ); 24 cmp_ok( $t->day, 'eq', &Time::Piece::_locale()->{wday}[ $t->_wday ] ); 25 cmp_ok( $t->fullday, 'eq', &Time::Piece::_locale()->{weekday}[ $t->_wday ] ); 29 cmp_ok( $t->day, 'eq', &Time::Piece::_locale()->{wday}[ $t->_wday ] ); 30 cmp_ok( $t->fullday, 'eq', &Time::Piece::_locale()->{weekday}[ $t->_wday ] ); [all …]
|
H A D | 99legacy.t | 7 BEGIN { use_ok('Time::Piece'); } 12 # parse() has been deleted from Time::Piece. 18 my $t1 = Time::Piece->parse($timestring); 22 eval { $t2 = Time::Piece->parse(); }; 24 eval { $t2 = Time::Piece::parse( 0, 0, 12, 1, 0, 100 ); };
|
H A D | 10overload.t | 3 use Time::Piece; 9 my $t = Time::Piece->gmtime(315532800); # 00:00:00 1/1/1980 10 isa_ok $t, 'Time::Piece'; 13 $t = Time::Piece->gmtime(Math::BigInt->new('315532800')); # 00:00:00 1/1/1980
|
H A D | 05overload.t | 4 use Time::Piece; 6 my $s = Time::Seconds->new(15); 8 ok($@, "", "Adding Time::Seconds does not cause runtime error");
|
/openbsd/gnu/usr.bin/perl/cpan/IO-Compress/t/ |
H A D | 105oneshot-gzip-only.t | 80 is $hdr->{Time}, $mtime, " Time is ok"; 90 is $hdr->{Time}, $mtime, " Time is ok"; 92 title "Override Time" ; 98 is $hdr->{Time}, 1234, " Time is 1234"; 100 title "Override Name and Time" ; 106 is $hdr->{Time}, 4321, " Time is 4321"; 117 cmp_ok $hdr->{Time}, '>=', $before, " Time is ok"; 118 cmp_ok $hdr->{Time}, '<=', $after, " Time is ok"; 122 title "Buffer doesn't have default Name or Time" ; 129 cmp_ok $hdr->{Time}, '>=', $before, " Time is ok"; [all …]
|
H A D | 105oneshot-zip-only.t | 80 is $hdr->{Time}>>1, $mtime>>1, " Time is ok"; 90 is $hdr->{Time} >> 1, $mtime >> 1, " Time is ok"; 92 title "Override Time" ; 99 is $hdr->{Time} >> 1 , $useTime >> 1 , " Time is $useTime"; 101 title "Override Name and Time" ; 108 is $hdr->{Time} >> 1 , $useTime >> 1 , " Time is $useTime"; 119 cmp_ok $hdr->{Time} >> 1, '>=', $before >> 1, " Time is ok"; 120 cmp_ok $hdr->{Time} >> 1, '<=', $after >> 1, " Time is ok"; 124 title "Buffer doesn't have default Name or Time" ; 131 cmp_ok $hdr->{Time} >> 1, '>=', $before >> 1, " Time is ok"; [all …]
|
/openbsd/gnu/usr.bin/perl/t/io/ |
H A D | eintr_print.t | 18 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/llvm/llvm/include/llvm/Support/Windows/ |
H A D | WindowsSupport.h | 204 inline std::chrono::nanoseconds toDuration(FILETIME Time) { in toDuration() argument 206 TimeInteger.LowPart = Time.dwLowDateTime; in toDuration() 207 TimeInteger.HighPart = Time.dwHighDateTime; in toDuration() 213 inline TimePoint<> toTimePoint(FILETIME Time) { in toTimePoint() argument 215 TimeInteger.LowPart = Time.dwLowDateTime; in toTimePoint() 216 TimeInteger.HighPart = Time.dwHighDateTime; in toTimePoint() 230 FILETIME Time; in toFILETIME() local 231 Time.dwLowDateTime = TimeInteger.LowPart; in toFILETIME() 232 Time.dwHighDateTime = TimeInteger.HighPart; in toFILETIME() 233 return Time; in toFILETIME()
|
/openbsd/gnu/usr.bin/perl/cpan/libnet/t/ |
H A D | time.t | 27 eval{ require Net::Time; }; 33 my $badsock = Net::Time::_socket('foo', 1, 'bar', 'baz'); 37 my $sock = Net::Time::_socket('foo', 2, 'bar'); 43 $sock = Net::Time::_socket('foo', 3, 'bar', 'tcp', 11); 52 is( Net::Time::inet_daytime('bob'), 'z', 'inet_daytime() should receive data' ); 62 is( Net::Time::inet_time('foo'), 6,
|
/openbsd/gnu/llvm/compiler-rt/lib/scudo/standalone/ |
H A D | secondary.h | 161 Entry.Time = Time; in store() 168 Entry.Time = 0; in store() 177 Entry.Time = 0; in store() 199 OldestTime = Entry.Time; in store() 214 OldestTime = Entry.Time; in store() 263 *Zeroed = Entry.Time == 0; in retrieve() 375 u64 Time; member 381 if (Entry.Time > Time) { in releaseIfOlderThan() 383 OldestTime = Entry.Time; in releaseIfOlderThan() 387 Entry.Time = 0; in releaseIfOlderThan() [all …]
|
/openbsd/gnu/llvm/llvm/include/llvm/Support/ |
H A D | Timer.h | 82 TimeRecord Time; ///< The total time captured. variable 135 TimeRecord getTotalTime() const { return Time; } in getTotalTime() 177 TimeRecord Time; member 183 PrintRecord(const TimeRecord &Time, const std::string &Name, in PrintRecord() 185 : Time(Time), Name(Name), Description(Description) {} in PrintRecord() 188 return Time < Other.Time;
|