Fix the danged ziatest - thx to Jeff, the mighty perl guru!
This commit was SVN r21116.
Этот коммит содержится в:
родитель
1c7dd5a4aa
Коммит
ce206df568
@ -1,5 +1,6 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
use Time::HiRes qw( gettimeofday );
|
push(@INC, $ENV{HOME}."/my-perl-mods");
|
||||||
($sec, $microsec) = gettimeofday;
|
require Time::HiRes;
|
||||||
$cmd = "mpirun -npernode " . @ARGV[0] . " ./ziatest " . " $sec " . $microsec;
|
($s, $usec) = Time::HiRes::gettimeofday();
|
||||||
|
$cmd = "mpirun -npernode " . @ARGV[0] . " ./ziatest " . " $s " . $usec;
|
||||||
system($cmd);
|
system($cmd);
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user