Close the pipe between pzstd and tar

Otherwise sockets get left open and it will die once it hits the 1024 limit.
Raku · May 14, 2017 · c63ed89 · c63ed89
1 parent 39cde1e
commit c63ed89
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/Benchable.p6 b/Benchable.p6
@@ -76,6 +76,7 @@ multi method benchmark-code($full-commit-hash, @code) {
     }
     my $proc = run :out, :bin, ‘pzstd’, ‘-dqc’, ‘--’, “{ARCHIVES-LOCATION}/rakudo-moar/$full-commit-hash.zst”;
     run :in($proc.out), :bin, ‘tar’, ‘x’, ‘--absolute-names’;
+    $proc.out.close;
     my $timing;
     if “{BUILDS-LOCATION}/rakudo-moar/$full-commit-hash/bin/perl6”.IO !~~ :e {
         return ‘Commit exists, but a perl6 executable could not be built for it’