Skip to content

Commit bb8eb2c

Browse files
committed
MakeMaker::Test::Setup::XS to allow holding one build so next can use
1 parent c81509c commit bb8eb2c

File tree

1 file changed

+10
-1
lines changed
  • t/lib/MakeMaker/Test/Setup

1 file changed

+10
-1
lines changed

t/lib/MakeMaker/Test/Setup/XS.pm

Lines changed: 10 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -428,8 +428,9 @@ sub list_dynamic {
428428
);
429429
}
430430

431+
my $held_dir = undef;
431432
sub run_tests {
432-
my ($perl, $label, $add_target, $add_testtarget) = @_;
433+
my ($perl, $label, $add_target, $add_testtarget, $hold_dir) = @_;
433434
my $sublabel = $add_target;
434435
$sublabel =~ s#[\s=]##g;
435436
ok( my $dir = setup_xs($label, $sublabel), "setup $label$sublabel" );
@@ -483,6 +484,14 @@ sub run_tests {
483484
chdir File::Spec->updir or die;
484485
if ($ENV{EUMM_KEEP_TESTDIRS}) {
485486
ok 1, "don't teardown $dir";
487+
return;
488+
}
489+
if (defined $held_dir) {
490+
ok rmtree($held_dir), "belated teardown $held_dir";
491+
$held_dir = undef;
492+
}
493+
if ($hold_dir) {
494+
$held_dir = $dir;
486495
} else {
487496
ok rmtree($dir), "teardown $dir";
488497
}

0 commit comments

Comments
 (0)