generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Test suite: minimal required to get mingw 'make test' work under Linux.

Browse Source 
(part by Alessandro Ghedini)

Reviewed-by: Richard Levitte <levitte@openssl.org>
This commit is contained in:
Andy Polyakov
2015-10-12 22:16:07 +02:00
parent 1dce6c3f9e
commit 4ada8be2a6
6 changed files with 26 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
test/testlib/OpenSSL/Test.pm
View File

@@ -357,7 +357,7 @@ operating system.
=cut
sub top_dir {
return __top_file(@_, ""); # This caters for operating systems that have
return __top_dir(@_); # This caters for operating systems that have
# a very distinct syntax for directories.
}
@@ -577,6 +577,12 @@ sub __top_file {
return catfile($directories{TOP},@_,$f);
}
sub __top_dir {
BAIL_OUT("Must run setup() first") if (! $test_name);
return catdir($directories{TOP},@_);
}
sub __test_file {
BAIL_OUT("Must run setup() first") if (! $test_name);
@@ -668,7 +674,9 @@ sub __fixup_cmd {
my $prefix = __top_file("util", "shlib_wrap.sh")." ";
my $ext = $ENV{"EXE_EXT"} || "";
if ( $^O eq "VMS" ) { # VMS
if (defined($ENV{EXE_SHELL})) {
$prefix = "$ENV{EXE_SHELL} ";
} elsif ($^O eq "VMS" ) { # VMS
$prefix = "mcr ";
$ext = ".exe";
} elsif ($^O eq "MSWin32") { # Windows