commit 0d9748159dfffd79c0d236e75e94ad8e2113e3ab
author Patrik Stridvall <ps@leissner.se> Tue May 23 23:37:51 2000 +0000
committer Alexandre Julliard <julliard@winehq.org> Tue May 23 23:37:51 2000 +0000
tree fd9b4a29269b965f59cdc863f795b5a7644990f6
parent 4615e29c586b8fbe787160de5d5565fa647ac36b

- Updated API files
- Better headers and prototype checking
- Prototype checking now called --prototype instead of --headers
- New options --headers-{duplicated,misplaced} for
  duplicated/misplaced functions checking of the headers.
- Minor bug fixes.

tools/winapi_check/winapi.pm

diff --git a/tools/winapi_check/winapi.pm b/tools/winapi_check/winapi.pm
index c91cdab..cc96b70 100644
--- a/tools/winapi_check/winapi.pm
+++ b/tools/winapi_check/winapi.pm
@@ -215,6 +215,7 @@
     my $output = \${$self->{OUTPUT}};
     my $function_arguments = \%{$self->{FUNCTION_ARGUMENTS}};
     my $function_calling_convention = \%{$self->{FUNCTION_CALLING_CONVENTION}};
+    my $function_external_name = \%{$self->{FUNCTION_EXTERNAL_NAME}};
     my $function_stub = \%{$self->{FUNCTION_STUB}};
     my $function_module = \%{$self->{FUNCTION_MODULE}};
     my $modules = \%{$self->{MODULES}};
@@ -256,6 +257,7 @@
 	    $ordinal = $1;
 
 	    # FIXME: Internal name existing more than once not handled properly
+	    $$function_external_name{$internal_name} = $external_name;
 	    $$function_arguments{$internal_name} = $arguments;
 	    $$function_calling_convention{$internal_name} = $calling_convention;
 	    if(!$$function_module{$internal_name}) {
@@ -571,6 +573,15 @@
     return $$function_calling_convention{$name};
 }
 
+sub function_external_name {
+    my $self = shift;
+    my $function_external_name = \%{$self->{FUNCTION_EXTERNAL_NAME}};
+
+    my $name = shift;
+
+    return $$function_external_name{$name};
+}
+
 sub is_function {
     my $self = shift;
     my $function_calling_convention = \%{$self->{FUNCTION_CALLING_CONVENTION}};