mirror of
https://github.com/openssl/openssl.git
synced 2025-02-17 14:32:04 +08:00
Refactor config - throw away '--test-sanity'
Get rid of the --test-sanity option. Since we no longer have string based configurations, we don't have the problem with miscounting colons any more. Reviewed-by: Rich Salz <rsalz@openssl.org>
This commit is contained in:
parent
76ffb43d1a
commit
bb56561adb
43
Configure
43
Configure
@ -1051,10 +1051,6 @@ PROCESS_ARGS:
|
||||
|
||||
$threads = 1 if ($algo eq "threads");
|
||||
}
|
||||
elsif (/^--test-sanity$/)
|
||||
{
|
||||
exit(&test_sanity());
|
||||
}
|
||||
elsif (/^--strict-warnings$/)
|
||||
{
|
||||
$strict_warnings = 1;
|
||||
@ -2560,42 +2556,3 @@ EOF
|
||||
print " },\n";
|
||||
}
|
||||
}
|
||||
|
||||
sub test_sanity
|
||||
{
|
||||
my $errorcnt = 0;
|
||||
|
||||
print STDERR "=" x 70, "\n";
|
||||
print STDERR "=== SANITY TESTING!\n";
|
||||
print STDERR "=== No configuration will be done, all other arguments will be ignored!\n";
|
||||
print STDERR "=" x 70, "\n";
|
||||
|
||||
foreach $target (sort keys %table)
|
||||
{
|
||||
my $pre_dso_scheme = "perlasm_scheme";
|
||||
my $dso_scheme = "dso_scheme";
|
||||
my $post_dso_scheme = "shared_target";
|
||||
|
||||
|
||||
if ($table{$target}->{$pre_dso_scheme} =~ /^(beos|dl|dlfcn|win32|vms)$/)
|
||||
{
|
||||
$errorcnt++;
|
||||
print STDERR "SANITY ERROR: '$target' has the dso_scheme values\n";
|
||||
print STDERR " in the previous field\n";
|
||||
}
|
||||
elsif ($table{$target}->{$post_dso_scheme} =~ /^(beos|dl|dlfcn|win32|vms)$/)
|
||||
{
|
||||
$errorcnt++;
|
||||
print STDERR "SANITY ERROR: '$target' has the dso_scheme values\n";
|
||||
print STDERR " in the following field\n";
|
||||
}
|
||||
elsif ($table{$target}->{$dso_scheme} !~ /^(beos|dl|dlfcn|win32|vms|)$/)
|
||||
{
|
||||
$errorcnt++;
|
||||
print STDERR "SANITY ERROR: '$target' has the dso_scheme field = ",$table{$target}->{$dso_scheme},"\n";
|
||||
print STDERR " valid values are 'beos', 'dl', 'dlfcn', 'win32' and 'vms'\n";
|
||||
}
|
||||
}
|
||||
print STDERR "No sanity errors detected!\n" if $errorcnt == 0;
|
||||
return $errorcnt;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user