diff options
| author | Karl Williamson <khw@cpan.org> | 2020-05-24 13:04:47 -0600 |
|---|---|---|
| committer | Sawyer X <xsawyerx@cpan.org> | 2020-05-27 11:09:32 +0300 |
| commit | 3b099a7fe6ef576ff433ea8cb60431d2d3dfcc2b (patch) | |
| tree | d6e38bd8ba6b7a5860574c6d70472b1a1310fb71 /t | |
| parent | 77b414f73a1cb5b2bcaafeb281ec8afe6ff7c671 (diff) | |
| download | perl-3b099a7fe6ef576ff433ea8cb60431d2d3dfcc2b.tar.gz | |
t/re/pat_advanced.t: Adapt for sl-o-o-w boxes
On some slow smokers, this test times out. There is an existing
mechanism which allows a smoker to compensate for this, but which was
not being used by this test file. Use it.
Diffstat (limited to 't')
| -rw-r--r-- | t/re/pat_advanced.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/re/pat_advanced.t b/t/re/pat_advanced.t index 21bdb8ca15..b5c7f1cab4 100644 --- a/t/re/pat_advanced.t +++ b/t/re/pat_advanced.t @@ -2390,7 +2390,7 @@ EOF TODO: { # Was looping todo_skip('Triggers thread clone SEGV. See #86550') if $::running_as_thread && $::running_as_thread; - watchdog(10); # Use a bigger value for busy systems + watchdog(10 * ($ENV{PERL_TEST_TIME_OUT_FACTOR} || 1)); like("\x{00DF}", qr/[\x{1E9E}_]*/i, "\"\\x{00DF}\" =~ /[\\x{1E9E}_]*/i was looping"); } |