diff options
author | Dr. Stephen Henson <steve@openssl.org> | 2005-04-19 18:57:17 +0000 |
---|---|---|
committer | Dr. Stephen Henson <steve@openssl.org> | 2005-04-19 18:57:17 +0000 |
commit | 40e950aed64808201993ed1e80df1b8b83ef5305 (patch) | |
tree | 48e4576208e0425e3dd1faf064548e84988c6b53 /util/mkdef.pl | |
parent | 987bebaf8c2232ef1d0a9169eb56570e3a0753b8 (diff) |
Stop perl warning.
Diffstat (limited to 'util/mkdef.pl')
-rwxr-xr-x | util/mkdef.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/util/mkdef.pl b/util/mkdef.pl index e6064baf6c..6cbdf77683 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -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 = ''; |