Apply local patches - perl-5.24.2

OK bluhm@, Reads ok sthen@

1 files changed, 2 insertions, 2 deletions

diff --git a/gnu/usr.bin/perl/t/re/speed.t b/gnu/usr.bin/perl/t/re/speed.t
index 648f2e9b749..0a32b5c9237 100644
--- a/gnu/usr.bin/perl/t/re/speed.t
+++ b/gnu/usr.bin/perl/t/re/speed.t
@@ -41,7 +41,7 @@ run_tests() unless caller;
 sub run_tests {
 
 
-    watchdog(($::running_as_thread && $::running_as_thread) ? 150 : 225);
+    watchdog(($::running_as_thread && $::running_as_thread) ? 150 : 540);
 
     {
         # [perl #120446]
@@ -150,7 +150,7 @@ PROG
         my $substr= substr( $str, 1 );
         1 while $substr=~m/0/g;
         $elapsed += time;
-        ok( $elapsed <= 1, "should not COW on long string with substr and m//g");
+        ok( $elapsed <= 2, "should not COW on long string with substr and m//g");
     }