Small fixes.

This commit is contained in:
Jan Eitzinger
2019-07-01 09:59:10 +02:00
parent 9bad3340b6
commit d8b4feb50a
3 changed files with 8 additions and 3 deletions

View File

@@ -3,11 +3,17 @@ use strict;
use warnings;
use utf8;
if ( $#ARGV < 2 ){
print "Usage: ./bench.pl <numcores> <seq|tp|ws> <SMT>\n";
exit;
}
my $numCores = $ARGV[0];
my $type = 0;
my $SMT = $ARGV[2] ? $ARGV[2] : 2;
my $N = 100;
if ( $ARGV[1] eq 'seq' ){
$type = 0;
} elsif ( $ARGV[1] eq 'tp' ){
@@ -24,7 +30,6 @@ while ( $N < 8000000 ) {
while ( $performance eq '0.00' ){
$result = `likwid-pin -c E:S0:$numCores:1:$SMT -q ./striad $type $N`;
$result =~ /([0-9.]+) ([0-9.]+)/;
my $size = $1;
$performance = $2;
}