Francois Gouget : winapi_check: Add support for the new architectures in the spec files.
Alexandre Julliard
julliard at winehq.org
Mon Oct 26 10:08:32 CDT 2009
Module: wine
Branch: master
Commit: 8ab66c7896f1f8c8c95e9910af073b31ff5eb31c
URL: http://source.winehq.org/git/wine.git/?a=commit;h=8ab66c7896f1f8c8c95e9910af073b31ff5eb31c
Author: Francois Gouget <fgouget at free.fr>
Date: Mon Oct 26 09:27:43 2009 +0100
winapi_check: Add support for the new architectures in the spec files.
---
tools/winapi/winapi.pm | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/tools/winapi/winapi.pm b/tools/winapi/winapi.pm
index 491063e..db0b06a 100644
--- a/tools/winapi/winapi.pm
+++ b/tools/winapi/winapi.pm
@@ -279,9 +279,9 @@ sub parse_spec_file($$) {
}
my $ordinal;
- my $ARCHES="alpha|i386|powerpc|sparc|x86_64";
+ my $ARCHES="alpha|i386|powerpc|sparc|win32|win64|x86_64";
if(/^(\d+|@)\s+
- (pascal|stdcall|cdecl|varargs)\s+
+ (cdecl|pascal|stdcall|varargs)\s+
((?:(?:-arch=(?:$ARCHES)(?:,(?:$ARCHES))*|-noname|-norelay|-i386|-ret16|-ret64|-register|-interrupt|-private)\s+)*)(\S+)\s*\(\s*(.*?)\s*\)\s*(\S*)$/x)
{
my $calling_convention = $2;
@@ -440,7 +440,7 @@ sub parse_spec_file($$) {
} else { # if($$function_external_module{$external_name} !~ /$module/) {
$$function_external_module{$external_name} .= " & $module";
}
- } elsif(/^(\d+|@)\s+extern(?:\s+(?:-norelay|-i386|-ret16|-ret64))?\s+(\S+)\s*(\S*)$/) {
+ } elsif(/^(\d+|@)\s+extern(?:\s+(?:-arch=(?:$ARCHES)(?:,(?:$ARCHES))*|-norelay|-i386|-ret16|-ret64))?\s+(\S+)\s*(\S*)$/) {
$ordinal = $1;
my $external_name = $2;
More information about the wine-cvs
mailing list