Francois Gouget : winapi: Fix the parse_c_declaration() prototype and remove unused variables.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 0dd5c442c1134778ac0b98cc57ab007b5832ac3f
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=0dd5c442c1134778ac0b98cc57...

Author: Francois Gouget 
Date:   Mon Apr 20 15:08:03 2009 +0200

winapi: Fix the parse_c_declaration() prototype and remove unused variables.

---

tools/winapi/c_parser.pm |   21 +++++----------------
 1 files changed, 5 insertions(+), 16 deletions(-)

diff --git a/tools/winapi/c_parser.pm b/tools/winapi/c_parser.pm
index 4d67bb9..f549fc1 100644
--- a/tools/winapi/c_parser.pm
+++ b/tools/winapi/c_parser.pm
@@ -563,16 +563,13 @@ sub parse_c_block($$$$$$$) {
 ########################################################################
 # parse_c_declaration

-sub parse_c_declaration($$$$$$$$$$$$) {
-    my $self = shift;
+sub parse_c_declaration($$$$)
+{
+    my ($self, $refcurrent, $refline, $refcolumn) = @_;

my $found_declaration = ${$self->{FOUND_DECLARATION}};
     my $found_function = ${$self->{FOUND_FUNCTION}};

-    my $refcurrent = shift;
-    my $refline = shift;
-    my $refcolumn = shift;
-
     local $_ = $$refcurrent;
     my $line = $$refline;
     my $column = $$refcolumn;
@@ -591,18 +588,10 @@ sub parse_c_declaration($$$$$$$$$$$$) {
     }

# Function
-    my $function = shift;
-
-    my $linkage = shift;
-    my $calling_convention = shift;
-    my $return_type = shift;
-    my $name = shift;
-    my @arguments = shift;
-    my @argument_lines = shift;
-    my @argument_columns = shift;
+    my $function;

# Variable
-    my $type;
+    my ($linkage, $type, $name);

if(s/^WINE_(?:DEFAULT|DECLARE)_DEBUG_CHANNEL\s*(\s*(\w+)\s*)\s*//s) { # FIXME: Wine specific kludge
    $self->_update_c_position($&, $line, $column);