system/wine
system/wine
1
0
Fork 0
mirror of git://source.winehq.org/git/wine.git synced 2024-07-21 13:34:10 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix for APIs that don't have any ordinal (ordinal=@).

Browse source
This commit is contained in:
Hidenori Takeshima 2000-11-12 03:40:27 +00:00 committed by Alexandre Julliard
parent a2053ab1c5
commit 4ca46fda34
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/c2man.pl
View file

@ -183,7 +183,7 @@ sub parse_source
}
elsif ($state == 3) {
#extract the wine API name and DLLNAME.XXX string
if ( / *([A-Za-z_0-9]+) *\(([A-Za-z0-9_]+\.[0-9]+)\) *$/ ) {
if ( / *([A-Za-z_0-9]+) *\(([A-Za-z0-9_]+\.(([0-9]+)|@))\) *$/ ) {
$apiname = $1;
$apientry = $2;
$state = 1;
@ -254,7 +254,7 @@ sub parse_spec
if( /^rsrc/ ) { next; }
if( /^import/ ) { next; }
if( /^\s*$/ ) { next; }
if( /^\s*([0-9]+)/ ) {
if( /^\s*(([0-9]+)|@)/ ) {
s/\(.*\)//; #remove all the args
($ord,$type,$name,$func) = split( /\s+/ );
if(( $type eq "stub" ) || ($type eq "forward")) {next;}