diff --git a/nodist/code_coverage b/nodist/code_coverage
index c86895a7f..d37541775 100755
--- a/nodist/code_coverage
+++ b/nodist/code_coverage
@@ -9,6 +9,7 @@ use File::Path qw(mkpath);
 use FindBin qw($RealBin);
 use Getopt::Long;
 use Parallel::Forker;
+use Unix::Processors;
 use IO::File;
 use Pod::Usage;
 use strict;
@@ -21,7 +22,8 @@ our $Remove_Gcda_Regexp;
 our @Remove_Sources;
 our @Source_Globs;
 
-our $Fork = new Parallel::Forker (use_sig_child=>1);
+our $Fork = new Parallel::Forker(use_sig_child => 1, poll_interval => 10*1000);
+$Fork->max_proc(Unix::Processors->new->max_online * 1.5);
 $SIG{CHLD} = sub { Parallel::Forker::sig_child($Fork); };
 $SIG{TERM} = sub { $Fork->kill_tree_all('TERM') if $Fork && $Fork->in_parent; die "Quitting...\n"; };
 
@@ -259,6 +261,7 @@ sub test {
         travis_fold_start("upload");
         print "Stage 18: Upload\n";
         my $cmd = "bash <(curl -s https://codecov.io/bash) -f $cc_dir/app_total.info";
+        print "print: Not running: export CODECOV_TOKEN=<hidden>\n";
         print "print: Not running: $cmd\n";
         travis_fold_end();
     }
diff --git a/test_regress/driver.pl b/test_regress/driver.pl
index 17e96ccd1..5008b753a 100755
--- a/test_regress/driver.pl
+++ b/test_regress/driver.pl
@@ -26,7 +26,7 @@ use Time::HiRes qw(usleep);
 $::Driver = 1;
 $::Have_Forker = 0;
 
-eval "use Parallel::Forker; \$Fork=Parallel::Forker->new(use_sig_child=>1); \$::Have_Forker=1;";
+eval "use Parallel::Forker; \$Fork=Parallel::Forker->new(use_sig_child=>1, poll_interval=>10*1000); \$::Have_Forker=1;";
 $Fork = Forker->new(use_sig_child=>1) if !$Fork;
 my $forker_Min_Version = 1.258;
 if ($::Have_Forker && $Parallel::Forker::VERSION < $forker_Min_Version) {