diff options
| author | Karl Williamson <khw@cpan.org> | 2022-08-22 13:16:33 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2022-08-24 07:55:08 -0600 |
| commit | ec8902ce0fa53ac15955cccd74b6cf118586474a (patch) | |
| tree | 7ad7f88a2d58ae0434d3a677d207d85e986f0d96 /dist | |
| parent | 3751ea98231eaef7f9abc03a354894354ecec1c4 (diff) | |
| download | perl-ec8902ce0fa53ac15955cccd74b6cf118586474a.tar.gz | |
Consolidate PERL_TEST_TIME_OUT_FACTOR to watchdog()
This changes test.pl watchdog() to always consider this potential
setting of an environment variable, and removes the distributed uses.
This means that no code needs to change when tests start failing on a
slow platform due to timing out; or when you need to temporarily
increase the timeout of a test for debugging. This will correspondingly
increase the timeout of all tests, but who cares for debugging purposes.
Diffstat (limited to 'dist')
| -rw-r--r-- | dist/threads/t/libc.t | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/dist/threads/t/libc.t b/dist/threads/t/libc.t index 65958949f6..592b8d350e 100644 --- a/dist/threads/t/libc.t +++ b/dist/threads/t/libc.t @@ -9,11 +9,8 @@ BEGIN { skip_all(q/Perl not compiled with 'useithreads'/); } - my $time_out_factor = $ENV{PERL_TEST_TIME_OUT_FACTOR} || 1; - $time_out_factor = 1 if $time_out_factor < 1; - # Guard against bugs that result in deadlock - watchdog(1 * 60 * $time_out_factor); + watchdog(1 * 60); plan(11); } |