yuzu-emu/mbedtls
1
0
Fork 0
mirror of https://github.com/yuzu-emu/mbedtls.git synced 2024-11-23 03:35:39 +01:00
Code Issues Packages Projects Releases Wiki Activity

test: Use GetOpt::Long for argument parsing

Browse Source 
Simplify argument parsing by using a core perl library for parsing
arguments.
This commit is contained in:
Jaeden Amero 2018-10-05 12:45:15 +01:00
parent 79e4f4e933
commit f4b521dd10
1 changed files with 2 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tests/scripts/run-test-suites.pl
View File

@ -24,14 +24,10 @@ use strict;
use utf8; use utf8;
use open qw(:std utf8); use open qw(:std utf8);
use constant FALSE => 0; use Getopt::Long;
use constant TRUE => 1;
my $verbose; my $verbose;
my $switch = shift; GetOptions( "verbose|v" => \$verbose );
if ( defined($switch) && ( $switch eq "-v" || $switch eq "--verbose" ) ) {
$verbose = TRUE;
}
# All test suites = executable files, excluding source files, debug # All test suites = executable files, excluding source files, debug
# and profiling information, etc. We can't just grep {! /\./} because # and profiling information, etc. We can't just grep {! /\./} because