mirror/openssl
2
0
Fork 0
mirror of https://github.com/openssl/openssl.git synced 2025-01-18 13:44:20 +08:00
Code Issues Packages Projects Releases Wiki Activity

Stop perl warning.

Browse Source
This commit is contained in:
Dr. Stephen Henson 2005-04-19 18:57:17 +00:00
parent 987bebaf8c
commit 40e950aed6
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
util/mkdef.pl
View File

@ -432,7 +432,11 @@ sub do_defs
print STDERR "DEBUG: parsing ----------\n" if $debug;
while(<IN>) {
last if (/\/\* Error codes for the \w+ functions\. \*\//);
if (/\/\* Error codes for the \w+ functions\. \*\//)
{
undef @tag;
last;
}
if ($line ne '') {
$_ = $line . $_;
$line = '';