diff options
author | Simon Josefsson <simon@josefsson.org> | 2011-12-06 13:44:02 +0100 |
---|---|---|
committer | Simon Josefsson <simon@josefsson.org> | 2011-12-06 13:44:06 +0100 |
commit | 0f8554e34b96c55616ee9639fa9f0546fc424430 (patch) | |
tree | 6acc4e554be9bf6f872a597c8d584df55353b7aa /doc/scripts | |
parent | 5f1ef036975e8b433cf69e8f826a5519ada317df (diff) | |
download | gnutls-0f8554e34b96c55616ee9639fa9f0546fc424430.tar.gz |
Fix getfuncs.pl parse bug; require non-empty list of function parameters.
Otherwise it would detect a comment like '* foo()' as another function.
Diffstat (limited to 'doc/scripts')
-rwxr-xr-x | doc/scripts/getfuncs.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/doc/scripts/getfuncs.pl b/doc/scripts/getfuncs.pl index 08518ee17f..b626ade9e2 100755 --- a/doc/scripts/getfuncs.pl +++ b/doc/scripts/getfuncs.pl @@ -11,15 +11,15 @@ while ($line=<STDIN>) { if ($line !~ m/typedef/ && $line !~ m/Copyright/) { $func = ''; - if ($line =~ m/^\s*\w+[\s\*]+([A-Za-z0-9_]+)\s*\(.*/) { + if ($line =~ m/^\s*\w+[\s\*]+([A-Za-z0-9_]+)\s*\([^\)]+/) { $func = $1; } - if ($line =~ m/^\s*\w+\s+\w+[\s\*]+([A-Za-z0-9_]+)\s*\(.*/) { + if ($line =~ m/^\s*\w+\s+\w+[\s\*]+([A-Za-z0-9_]+)\s*\([^\)]+/) { $func = $1; } - if ($line =~ m/^[\s\*]*([A-Za-z0-9_]+)\s*\(.*/) { + if ($line =~ m/^[\s\*]*([A-Za-z0-9_]+)\s*\([^\)]+/) { $func = $1; } |