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
088c30c7
Commit
088c30c7
authored
Jul 31, 2007
by
Francois Gouget
Committed by
Alexandre Julliard
Jul 31, 2007
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
winapi: Remove some dead code.
parent
db895bb5
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
0 additions
and
39 deletions
+0
-39
c_parser.pm
tools/winapi/c_parser.pm
+0
-39
No files found.
tools/winapi/c_parser.pm
View file @
088c30c7
...
...
@@ -2090,45 +2090,6 @@ sub parse_c_variable($$$$$$$) {
# $output->write("$type: $name: '$_'\n");
if
(
1
||
$finished
)
{
# Nothing
}
elsif
(
$self
->
_parse_c
(
'(?:struct\s+)?ICOM_VTABLE\s*\(.*?\)'
,
\
$_
,
\
$line
,
\
$column
,
\
$match
))
{
$type
=
"<type>"
;
$name
=
"<name>"
;
}
elsif
(
s/^((?:enum\s+|interface\s+|struct\s+|union\s+)?\w+)\s*
(?:\*\s*)*(\w+|\s*\*?\s*\w+\s*\))\s*(?:\[[^\]]*\]|\([^\)]*\))?
(?:,\s*(?:\*\s*)*(\w+)\s*(?:\[[^\]]*\])?)*
\s*(?:=|$)//sx
)
{
$self
->
_update_c_position
(
$&
,
\
$line
,
\
$column
);
$type
=
$1
;
$name
=
$2
;
$type
=~
s/\s//g
;
$type
=~
s/^struct/struct /
;
}
elsif
(
/^(enum|interface|struct|union)(?:\s+(\w+))?\s*\{.*?\}\s*((?:\*\s*)*)(\w+)\s*(?:=|$)/s
)
{
$self
->
_update_c_position
(
$&
,
\
$line
,
\
$column
);
my
$kind
=
$1
;
my
$_name
=
$2
;
my
$stars
=
$3
;
$name
=
$4
;
if
(
defined
(
$_name
))
{
$type
=
"struct $_name { }"
;
}
else
{
$type
=
"struct { }"
;
}
$stars
=~
s/\s//g
;
if
(
$stars
)
{
$type
.=
" $type"
;
}
}
else
{
return
0
;
}
$$refcurrent
=
$_
;
$$refline
=
$line
;
$$refcolumn
=
$column
;
...
...
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