Fix RSA structure

[openssl.git] / util / mkdef.pl

diff --git a/util/mkdef.pl b/util/mkdef.pl
index b923cb62c3a3ab835e60daff0776032d843648d4..6d376d3aab9b6b2aef17a13660a03d364a2c8cf5 100755 (executable)
--- a/util/mkdef.pl
+++ b/util/mkdef.pl
@@ -31,6 +31,7 @@ my $version = undef;            # the version to use for the library
 my $OS = undef;                 # the operating system family
 my $verbose = 0;
 my $ctest = 0;
+my $debug = 0;
 
 # For VMS, some modules may have case insensitive names
 my $case_insensitive = 0;
@@ -193,7 +194,7 @@ sub feature_filter {
             my $symdep = $1 * 10000 + $2 * 100 + ($3 // 0);
             $verdict = 0 if $config{api} >= $symdep;
             print STDERR "DEBUG: \$symdep = $symdep, \$verdict = $verdict\n"
-                if $1 == 0;
+                if $debug && $1 == 0;
         }
     }