ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

winapi_check: Add support for the new architectures in the spec files.

This commit is contained in:
Francois Gouget 2009-10-26 09:27:43 +01:00 committed by Alexandre Julliard
parent 370873f974
commit 8ab66c7896
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tools/winapi/winapi.pm
View File

@ -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;