|
88 | 88 |
|
89 | 89 | $retVal = GetOptions(\%CmdLineOption, |
90 | 90 | 'help' => sub { Usage() and exit 0 }, |
91 | | - "forcearch=s" => \$arch, |
92 | | - "forceabi=s" => \$abi, |
93 | | - "forceos=s" => \$os, |
94 | | - "build=s" => \$build, |
| 91 | + "forcearch=s" => \$arch, |
| 92 | + "forceabi=s" => \$abi, |
| 93 | + "forceos=s" => \$os, |
| 94 | + "build=s" => \$build, |
95 | 95 | "timeout-min=i" => \$timeout_min, |
96 | 96 | "filter-list-file=s" => \$filter_list_file, |
97 | 97 | "test-list-file=s" => \$test_list_file, |
98 | 98 | "unit-test-list-file=s" => \$unit_test_list_file, |
99 | 99 | "testname=s" => \$testname, |
100 | 100 | "dvs" => \$dvs, |
101 | 101 | "openmp" => \$openmp, |
102 | | - "remote_server=s" => \$remote_server, |
103 | | - "remote_android" => \$remote_android, |
104 | | - "remote_path=s" => \$remote_path, |
105 | | - ); |
| 102 | + "remote_server=s" => \$remote_server, |
| 103 | + "remote_android" => \$remote_android, |
| 104 | + "remote_path=s" => \$remote_path, |
| 105 | + ); |
106 | 106 |
|
107 | 107 | # Generate gold output files (set to 1 manually) |
108 | 108 | my $generate_gold = 0; |
|
117 | 117 | else { |
118 | 118 | $abi = "_${abi}"; |
119 | 119 | } |
120 | | -} |
121 | | -elsif ($arch eq "aarch64") { |
122 | | - $abi = "_${abi}"; |
123 | | -} |
124 | | -else { |
125 | | - $abi = ""; #Ignore abi for architectures other than arm |
126 | | -} |
| 120 | + } |
| 121 | + else { |
| 122 | + $abi = ""; #Ignore abi for architectures other than arm |
| 123 | + } |
127 | 124 |
|
128 | 125 | if ($remote_server || $remote_android) { |
129 | 126 | $remote = 1; |
@@ -291,7 +288,7 @@ sub xgetUnitTestList { |
291 | 288 | foreach my $line (<$fin>) { |
292 | 289 | $line =~ s/\s+$//; |
293 | 290 | # Put $line in quotes to avoid <> problems |
294 | | - push (@utl, "thrust_test \"$line\""); |
| 291 | + push (@utl, "thrust_test \"$line\""); |
295 | 292 | } |
296 | 293 | close $fin; |
297 | 294 | return @utl; |
@@ -408,13 +405,13 @@ sub get_file { |
408 | 405 | } |
409 | 406 |
|
410 | 407 | sub compare_arrays { |
411 | | - my ($first, $second) = @_; |
412 | | - no warnings; # silence spurious -w undef complaints |
413 | | - return 0 unless @$first == @$second; |
414 | | - for (my $i = 0; $i < @$first; $i++) { |
415 | | - return 0 if $first->[$i] ne $second->[$i]; |
416 | | - } |
417 | | - return 1; |
| 408 | + my ($first, $second) = @_; |
| 409 | + no warnings; # silence spurious -w undef complaints |
| 410 | + return 0 unless @$first == @$second; |
| 411 | + for (my $i = 0; $i < @$first; $i++) { |
| 412 | + return 0 if $first->[$i] ne $second->[$i]; |
| 413 | + } |
| 414 | + return 1; |
418 | 415 | } |
419 | 416 |
|
420 | 417 | my $passed = 0; |
@@ -535,33 +532,33 @@ sub xrun_unit_tests { |
535 | 532 | ($tester, $test) = split(/ /, $test_cmd); |
536 | 533 | $test =~ s/\"//g; |
537 | 534 |
|
538 | | - if ($remote && -f "${binpath}/${tester}" && ($copied_tester == 0)) { |
539 | | - remote_push("${binpath}/${tester}", "${remote_path}/${tester}"); |
540 | | - $copied_tester = 1; |
541 | | - } |
| 535 | + if ($remote && -f "${binpath}/${tester}" && ($copied_tester == 0)) { |
| 536 | + remote_push("${binpath}/${tester}", "${remote_path}/${tester}"); |
| 537 | + $copied_tester = 1; |
| 538 | + } |
542 | 539 |
|
543 | 540 | print_time; |
544 | 541 | next if isFiltered("$tester \"$test\""); |
545 | 542 | my $ret; |
546 | 543 |
|
547 | | - print "&&&& RUNNING $tester \"$test\"\n"; |
548 | | - if ($remote) { |
549 | | - if ($remote_android) { |
550 | | - $cmd = "${remote_path}/${tester} \\\"${test}\\\""; |
551 | | - } else { |
552 | | - $cmd = "${remote_path}/${tester} \"\\\"${test}\\\"\""; |
553 | | - } |
554 | | - } else { |
555 | | - $cmd = "${binpath}/${tester} \"${test}\""; |
556 | | - } |
557 | | - $ret = run_cmd $cmd; |
558 | | - if ($ret != 0) { |
559 | | - print "&&&& FAILED $tester \"$test\"\n"; |
560 | | - $failed = $failed + 1; |
561 | | - } else { |
562 | | - print "&&&& PASSED $tester \"$test\"\n"; |
563 | | - $passed = $passed + 1; |
564 | | - } |
| 544 | + print "&&&& RUNNING $tester \"$test\"\n"; |
| 545 | + if ($remote) { |
| 546 | + if ($remote_android) { |
| 547 | + $cmd = "${remote_path}/${tester} \\\"${test}\\\""; |
| 548 | + } else { |
| 549 | + $cmd = "${remote_path}/${tester} \"\\\"${test}\\\"\""; |
| 550 | + } |
| 551 | + } else { |
| 552 | + $cmd = "${binpath}/${tester} \"${test}\""; |
| 553 | + } |
| 554 | + $ret = run_cmd $cmd; |
| 555 | + if ($ret != 0) { |
| 556 | + print "&&&& FAILED $tester \"$test\"\n"; |
| 557 | + $failed = $failed + 1; |
| 558 | + } else { |
| 559 | + print "&&&& PASSED $tester \"$test\"\n"; |
| 560 | + $passed = $passed + 1; |
| 561 | + } |
565 | 562 | } |
566 | 563 | } |
567 | 564 | sub run_unit_tests { |
|
0 commit comments