blob: 6a05dec473ca0525594ac38e1fc80f27446fdb51 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
#!/usr/bin/perl
my $rank = shift @ARGV;
my $args = join(' ',@ARGV);
if ($rank == $ENV{MPD_JRANK}) {
$c = "LD_PRELOAD=$ENV{'HOME'}/csl/obsd/src/pmds/gprof-helper.so ./newsyn $args";
} else {
$c = "./newsyn.nopg $args";
}
#print "$rank: $c\n";
system $c;
|