diff options
Diffstat (limited to 'vest/dist-vest.pl')
| -rwxr-xr-x | vest/dist-vest.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/vest/dist-vest.pl b/vest/dist-vest.pl index 666509e3..8acec7a9 100755 --- a/vest/dist-vest.pl +++ b/vest/dist-vest.pl @@ -56,6 +56,7 @@ my $maxsim=0; my $oraclen=0; my $oracleb=20; my $dirargs=''; +my $usefork; # Process command-line options Getopt::Long::Configure("no_auto_abbrev"); @@ -63,6 +64,7 @@ if (GetOptions( "decoder=s" => \$decoderOpt, "decode-nodes=i" => \$decode_nodes, "dont-clean" => \$disable_clean, + "use-fork" => \$usefork, "dry-run" => \$dryrun, "epsilon=s" => \$epsilon, "help" => \$help, @@ -89,6 +91,8 @@ if (GetOptions( exit; } +if ($usefork) { $usefork = "--use-fork"; } else { $usefork = ''; } + if ($metric =~ /^(combi|ter)$/i) { $lines_per_mapper = 40; } @@ -230,7 +234,7 @@ while (1){ my $im1 = $iteration - 1; my $weightsFile="$dir/weights.$im1"; my $decoder_cmd = "$decoder -c $iniFile -w $weightsFile -O $dir/hgs"; - my $pcmd = "cat $srcFile | $parallelize -p $pmem -e $logdir -j $decode_nodes -- "; + my $pcmd = "cat $srcFile | $parallelize $usefork -p $pmem -e $logdir -j $decode_nodes -- "; if ($run_local) { $pcmd = "cat $srcFile |"; } my $cmd = $pcmd . "$decoder_cmd 2> $decoderLog 1> $runFile"; print STDERR "COMMAND:\n$cmd\n"; |