|
@@ -1430,7 +1430,7 @@ sub create_parameterlist($$$) {
|
|
# corresponding data structures "correctly". Catch it later in
|
|
# corresponding data structures "correctly". Catch it later in
|
|
# output_* subs.
|
|
# output_* subs.
|
|
push_parameter($arg, "", $file);
|
|
push_parameter($arg, "", $file);
|
|
- } elsif ($arg =~ m/\(/) {
|
|
|
|
|
|
+ } elsif ($arg =~ m/\(.*\*/) {
|
|
# pointer-to-function
|
|
# pointer-to-function
|
|
$arg =~ tr/#/,/;
|
|
$arg =~ tr/#/,/;
|
|
$arg =~ m/[^\(]+\(\*([^\)]+)\)/;
|
|
$arg =~ m/[^\(]+\(\*([^\)]+)\)/;
|