tange/parallel
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/parallel.git synced 2024-11-22 05:57:54 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

parallel: memfree script sometimes fail: Run it twice.

Browse source
This commit is contained in:
Ole Tange 2015-11-22 11:15:45 +01:00
parent 72ff28f801
commit 68ee1c3f70
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/parallel
View file

@ -4247,7 +4247,8 @@ sub memfree_recompute {
my $script = memfreescript();
# TODO add sshlogin and backgrounding
$self->{'memfree'} = qx{ $script };
# Run it twice if it gives 0
$self->{'memfree'} = qx{ $script } || qx{ $script };
if(not $self->{'memfree'}) {
::die_bug("Less than 1 byte free");
}