diff options
Diffstat (limited to 'iltest')
-rwxr-xr-x | iltest | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -46,14 +46,17 @@ sub usage () { print "Options:\n"; print " --verbose be verbose, very verbose\n"; print " --quiet don't print anything but test results\n"; + print " --suite tester is a ILTest::TestSuite\n"; exit(1); } my $verbosity = "5"; my $quiet = ""; +my $suite = ""; GetOptions("verbose=i" => \$verbosity, - "quiet" => \$quiet); + "quiet" => \$quiet, + "suite" => \$suite); $verbosity = 0 if ($quiet); @@ -64,6 +67,7 @@ usage() if (not $testee or not $tester); my $iltest = ILTest::ILTest->new(testee => $testee, tester => $tester, + suite => $suite, verbosity => $verbosity); my $rc = $iltest->test(); if ($rc) { |