pyrox.dev / nixpkgs
lol
fork atom

test-driver: Show test duration

Eelco Dolstra 996e0ef7 5b1dad79

+6
unified split
+6
nixos/lib/test-driver/test-driver.pl
··· 8 use Logger; 9 use Cwd; 10 use POSIX qw(_exit dup2); 11 12 $SIG{PIPE} = 'IGNORE'; # because Unix domain sockets may die unexpectedly 13 ··· 179 $log->close(); 180 } 181 182 183 runTests; 184 185 exit ($nrSucceeded < $nrTests ? 1 : 0);
··· 8 use Logger; 9 use Cwd; 10 use POSIX qw(_exit dup2); 11 + use Time::HiRes qw(clock_gettime CLOCK_MONOTONIC); 12 13 $SIG{PIPE} = 'IGNORE'; # because Unix domain sockets may die unexpectedly 14 ··· 180 $log->close(); 181 } 182 183 + my $now1 = clock_gettime(CLOCK_MONOTONIC); 184 185 runTests; 186 + 187 + my $now2 = clock_gettime(CLOCK_MONOTONIC); 188 + 189 + printf STDERR "test script finished in %.2fs\n", $now2 - $now1; 190 191 exit ($nrSucceeded < $nrTests ? 1 : 0);