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>

diff --git a/Configure b/Configure
index 934e934dbb15c382d71b2f699e68945b7409a411..9f88d12b163b3df36f9816e3bf054bd9bd419ffe 100755 (executable)
--- a/Configure
+++ b/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;
-       }