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

Make winapi_check handle spec files where no handler is specified.

This commit is contained in:
Hans Leidekker 2003-04-07 23:19:43 +00:00 committed by Alexandre Julliard
parent 2d5cf55352
commit 0c3e654b1c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tools/winapi/winapi.pm
View File

@ -271,7 +271,7 @@ sub parse_spec_file {
my $ordinal; my $ordinal;
if(/^(\d+|@)\s+ if(/^(\d+|@)\s+
(pascal|pascal16|stdcall|cdecl|varargs)\s+ (pascal|pascal16|stdcall|cdecl|varargs)\s+
((?:(?:-noimport|-noname|-norelay|-i386|-ret64|-register|-interrupt)\s+)*)(\S+)\s*\(\s*(.*?)\s*\)\s*(\S+)$/x) ((?:(?:-noimport|-noname|-norelay|-i386|-ret64|-register|-interrupt)\s+)*)(\S+)\s*\(\s*(.*?)\s*\)\s*(\S*)$/x)
{ {
my $calling_convention = $2; my $calling_convention = $2;
my $flags = $3; my $flags = $3;
@ -440,7 +440,7 @@ sub parse_spec_file {
$$module_external_calling_convention{$module}{"\@$ordinal"} = "forward"; $$module_external_calling_convention{$module}{"\@$ordinal"} = "forward";
} }
$$function_forward{$module}{$external_name} = [$forward_module, $forward_name]; $$function_forward{$module}{$external_name} = [$forward_module, $forward_name];
} elsif(/^(\d+|@)\s+extern\s+(\S+)\s+(\S+)$/) { } elsif(/^(\d+|@)\s+extern\s+(\S+)\s*(\S*)$/) {
$ordinal = $1; $ordinal = $1;
my $external_name = $2; my $external_name = $2;