This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add new regnode: ANYOFH, without a bitmap
[perl5.git] / t / TEST
diff --git a/t/TEST b/t/TEST
index 63f0c36..fb293d4 100755 (executable)
--- a/t/TEST
+++ b/t/TEST
@@ -49,7 +49,6 @@ my %abs = (
           '../cpan/File-Fetch' => 1,
           '../cpan/IPC-Cmd' => 1,
           '../cpan/IPC-SysV' => 1,
-          '../cpan/Locale-Codes' => 1,
           '../cpan/Module-Load' => 1,
           '../cpan/Module-Load-Conditional' => 1,
           '../cpan/Pod-Simple' => 1,
@@ -61,8 +60,7 @@ my %abs = (
           '../dist/Tie-File' => 1,
          );
 
-my %temp_no_core =
-    ('../cpan/B-Debug' => 1,
+my %temp_no_core = (
      '../cpan/Compress-Raw-Bzip2' => 1,
      '../cpan/Compress-Raw-Zlib' => 1,
      '../cpan/Devel-PPPort' => 1,
@@ -82,15 +80,9 @@ my %temp_no_core =
 # Ideally this # list will eventually be empty
 
 my %temp_needs_dot  = map { $_ => 1 } qw(
-    ../cpan/ExtUtils-Install
     ../cpan/Filter-Util-Call
     ../cpan/libnet
-    ../cpan/Locale-Codes
-    ../cpan/Math-BigInt
-    ../cpan/Math-BigRat
-    ../cpan/Test-Harness
     ../cpan/Test-Simple
-    ../cpan/version
 );
 
 
@@ -315,7 +307,8 @@ sub _cmd {
             my $perl_supp = $options->{return_dir} ? "$options->{return_dir}/perl.supp" : "perl.supp";
             my $valgrind_exe = $ENV{VALGRIND} // 'valgrind';
             if ($options->{run_dir}) {
-                $Valgrind_Log = "$options->{run_dir}/$Valgrind_Log";
+                require Cwd;
+                $Valgrind_Log = Cwd::abs_path("$options->{run_dir}/$Valgrind_Log");
             }
             my $vg_opts = $ENV{VG_OPTS}
               //   "--log-file=$Valgrind_Log "