Commit 416a42c3 authored by Patrik Stridvall's avatar Patrik Stridvall Committed by Alexandre Julliard

Updated winapi_check to handle the new additions.

parent b7c84d3b
%long
POLICY_INFORMATION_CLASS
%long --extension
LSA_HANDLE
\ No newline at end of file
......@@ -5,3 +5,7 @@ HBITMAP
HDC
HICON
HWND
%ptr
TRACKMOUSEEVENT *
\ No newline at end of file
%long
SQLHANDLE
SQLHDBC
SQLHDESC
SQLHENV
SQLHSTMT
SQLHWND
SQLINTEGER
SQLSMALLINT
SQLUINTEGER
SQLUSMALLINT
%long --extension
SQLRETURNTYPE
%ptr
SQLCHAR *
SQLHANDLE *
SQLHENV *
SQLHSTMT *
SQLINTEGER *
SQLPOINTER
SQLPOINTER *
SQLSMALLINT *
SQLUINTEGER *
SQLUSMALLINT *
......@@ -46,6 +46,7 @@ sub parse_api_file {
my $module = shift;
my $kind;
my $extension = 0;
my $forbidden = 0;
$$output->progress("$file");
......@@ -60,10 +61,13 @@ sub parse_api_file {
if(s/^%(\S+)\s*//) {
$kind = $1;
$forbidden = 0;
$extension = 0;
$$allowed_kind{$kind} = 1;
if(/^--forbidden/) {
$forbidden = 1;
} elsif(/^--extension/) {
$extension = 1;
}
} elsif(defined($kind)) {
my $type = $_;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment