Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
W
wine-winehq
Project
Project
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Registry
Registry
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
wine
wine-winehq
Commits
6d529952
Commit
6d529952
authored
Mar 28, 2000
by
Patrik Stridvall
Committed by
Alexandre Julliard
Mar 28, 2000
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
- Updated the API files.
- Minor bug fixes
parent
3699ef77
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
9 additions
and
9 deletions
+9
-9
kernel32.api
tools/winapi_check/win32/kernel32.api
+1
-1
winapi_check
tools/winapi_check/winapi_check
+5
-5
winapi_options.pm
tools/winapi_check/winapi_options.pm
+3
-3
No files found.
tools/winapi_check/win32/kernel32.api
View file @
6d529952
...
...
@@ -94,7 +94,7 @@ LPMODULEENTRY
LPOVERLAPPED
LPOVERLAPPED_COMPLETION_ROUTINE
LPPROCESSENTRY
LPPROCESS_HEAP_ENTRY
*
LPPROCESS_HEAP_ENTRY
LPPROCESS_INFORMATION
LPPROGRESS_ROUTINE
LPSECURITY_ATTRIBUTES
...
...
tools/winapi_check/winapi_check
View file @
6d529952
...
...
@@ -255,13 +255,13 @@ foreach my $file ($options->files) {
}
$name2
=
$name1
;
$name2
=~
s/([AW])$/16$1/
;
#
$name2 =~ s/([AW])$/16$1/;
$name3
=
$name1
;
$name3
=~
s/16(([AW])?)$/$1/
;
$name4
=
$name1
;
$name4
=~
s/^(.*?)(?:16)?$/\U$1\E/
;
#
$name4 =~ s/^(.*?)(?:16)?$/\U$1\E/;
$name5
=
$name1
;
$name5
=
s/^(.*?)16_fn(.*?)$/$116_$2/
;
...
...
@@ -274,10 +274,10 @@ foreach my $file ($options->files) {
}
$name2
=
$name1
;
$name2
=~
s/([AW])$/32$1/
;
#
$name2 =~ s/([AW])$/32$1/;
$name3
=
$name1
;
$name3
=~
s/32(([AW])?)$/$1/
;
#
$name3 =~ s/32(([AW])?)$/$1/;
$name4
=
$name1
;
$name4
=~
s/AW$//
;
...
...
@@ -301,7 +301,7 @@ foreach my $file ($options->files) {
$name5
=
$name1
;
}
if
(
$name
!~
/^SMapLS|SUnMapLS/
&&
$documentation
!~
/
($name|$name1|$name2|$name3|$name4|$name5)
/
)
{
if
(
$name
!~
/^SMapLS|SUnMapLS/
&&
$documentation
!~
/
\b($name|$name1|$name2|$name3|$name4|$name5)\b
/
)
{
$output
->
write
(
"$file: $name: \\\n"
);
$output
->
write
(
"$documentation\n"
);
}
...
...
tools/winapi_check/winapi_options.pm
View file @
6d529952
...
...
@@ -59,7 +59,7 @@ my %options = (
"calling-convention"
=>
{
default
=>
0
,
parent
=>
"local"
,
description
=>
"calling convention checking"
},
"misplaced"
=>
{
default
=>
0
,
parent
=>
"local"
,
description
=>
"check for misplaced functions"
},
"cross-call"
=>
{
default
=>
0
,
parent
=>
"local"
,
description
=>
"check for cross calling functions"
},
"documentation"
=>
{
default
=>
0
,
parent
=>
"local"
,
description
=>
"check for documentation inconsistances\n"
},
"documentation"
=>
{
default
=>
1
,
parent
=>
"local"
,
description
=>
"check for documentation inconsistances\n"
},
"global"
=>
{
default
=>
1
,
description
=>
"global checking"
},
"declared"
=>
{
default
=>
1
,
parent
=>
"global"
,
description
=>
"declared checking"
},
...
...
@@ -173,14 +173,14 @@ sub new {
$paths
=
join
(
" "
,
@$files
);
}
@$files
=
map
{
@$files
=
sort
(
map
{
s/^.\/(.*)$/$1/
;
if
(
!
/spec\.c$/
)
{
$_
;
}
else
{
();
}
}
split
(
/\n/
,
`find $paths -name \\*.c`
);
}
split
(
/\n/
,
`find $paths -name \\*.c`
)
)
;
return
$self
;
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment