提交 fd99c6b5 编写于 作者: R Richard Levitte

Change OpenSSL::Test to be an extension of Test::More

It became tedious as well as error prone to have all recipes use
Test::More as well as OpenSSL::Test.  The easier way is to make
OpenSSL::Test an extension of Test::More, thereby having all version
checks as well as future checks firmly there.  Additionally, that
allows us to extend existing Test::More functions if the need would
arise.
Reviewed-by: NRich Salz <rsalz@openssl.org>
上级 caadc543
......@@ -3,8 +3,6 @@
use strict;
use File::Spec::Functions;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("check_testexes");
......@@ -51,7 +49,7 @@ my $MINFO = top_file("MINFO");
plan tests => $numtests;
skip "because $MINFO found. If you want this test to run, please do 'perl util/mkfiles.pl > $MINFO'", 1
skip "because $MINFO not found. If you want this test to run, please do 'perl util/mkfiles.pl > $MINFO'", 1
unless %foundfiles;
foreach (sort keys %foundfiles) {
......
......@@ -5,7 +5,6 @@ use warnings;
use Math::BigInt;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_bn");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_dsa");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_ec");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_rsa");
......
......@@ -7,7 +7,6 @@ use File::Spec::Functions qw/catfile/;
use File::Copy;
use File::Compare qw/compare_text/;
use File::Basename;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_enc");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_crl");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_gen");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_pkcs7");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_req");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_sid");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec::Functions qw/canonpath/;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_dir top_file/;
setup("test_verify");
......
......@@ -4,7 +4,6 @@ use strict;
use warnings;
use File::Spec;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_x509");
......
......@@ -3,7 +3,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test;
setup("test_engine");
......
......@@ -3,7 +3,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_file/;
setup("test_evp");
......
......@@ -3,7 +3,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test;
setup("test_evp_extra");
......
......@@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/splitdir curdir catfile devnull/;
use File::Path 2.00 qw/remove_tree/;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT cmdstr top_file quotify/;
setup("test_ca");
......
......@@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/catfile/;
use File::Compare qw/compare_text/;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_dir top_file/;
setup("test_cms");
......
......@@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/devnull catfile/;
use File::Copy;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT with pipe top_dir/;
setup("test_ocsp");
......
......@@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec;
use File::Copy;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT with top_file/;
setup("test_ssl");
......
......@@ -6,7 +6,6 @@ use warnings;
use POSIX;
use File::Spec::Functions qw/splitdir curdir catfile/;
use File::Compare;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT cmdstr top_file/;
setup("test_tsa");
......
......@@ -2,7 +2,6 @@
use strict;
use warnings;
use Test::More 0.96;
use OpenSSL::Test qw/:DEFAULT top_dir/;
setup("test_gost2814789");
......
......@@ -5,7 +5,6 @@ use warnings;
use File::Compare qw/compare_text/;
use File::Copy;
use Test::More 0.96;
use lib 'testlib';
use OpenSSL::Test qw/:DEFAULT top_file/;
......
......@@ -3,12 +3,15 @@ package OpenSSL::Test;
use strict;
use warnings;
use Test::More 0.96;
use Exporter;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
$VERSION = "0.5";
@ISA = qw(Exporter);
@EXPORT = qw(setup indir app test run);
@EXPORT_OK = qw(top_dir top_file pipe with cmdstr quotify));
@EXPORT = (@Test::More::EXPORT, qw(setup indir app test run));
@EXPORT_OK = (@Test::More::EXPORT_OK, qw(top_dir top_file pipe with cmdstr
quotify));
use File::Copy;
......@@ -16,7 +19,6 @@ use File::Spec::Functions qw/file_name_is_absolute curdir canonpath splitdir
catdir catfile splitpath catpath devnull abs2rel
rel2abs/;
use File::Path 2.00 qw/remove_tree mkpath/;
use Test::More 0.96;
my $test_name = undef;
......
......@@ -10,7 +10,6 @@ $VERSION = "0.1";
@EXPORT = qw(simple_test);
use Test::More 0.96;
use OpenSSL::Test;
# args:
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册