do not delete _Inline/

shlomif · Dec 5, 2024 · 57932fa · 57932fa
1 parent de5de56
commit 57932fa
Showing 1 changed file with 8 additions and 3 deletions.
diff --git a/cpan/Games-Solitaire-Verify/benchmark/sanity-test.pl b/cpan/Games-Solitaire-Verify/benchmark/sanity-test.pl
@@ -27,12 +27,17 @@ sub do_system
 
 sub _cleanup
 {
-    rmtree( ["_Inline"] );
+    my ($start) = @_;
+
+    if ($start)
+    {
+        rmtree( ["_Inline"] );
+    }
     unlink( grep { -f $_ } glob("Results/*.res") );
     return;
 }
 
-_cleanup();
+_cleanup(1);
 
 do_system( { cmd => [ "gmake", "-f", "par2.mak", "-j1", "Results/1.res", ] } );
 do_system( { cmd => [ "gmake", "-f", "par2.mak", "-j1", "Results/2.res", ] } );
@@ -57,5 +62,5 @@ sub _cleanup
 }
 continue { ++$i; }
 Carp::confess() if $i ne 401;
-_cleanup();
+_cleanup('');
 unlink( "build.ninja", "par2.mak" );