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
eb3fec1b
Commit
eb3fec1b
authored
Nov 04, 2005
by
Vincent Béron
Committed by
Alexandre Julliard
Nov 04, 2005
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
__RPC_STUB is a calling convention as well (#defined as __stdcall).
parent
a17528cd
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
7 additions
and
7 deletions
+7
-7
winapi_function.pm
tools/winapi/winapi_function.pm
+2
-2
winapi_local.pm
tools/winapi/winapi_local.pm
+2
-2
winapi_parser.pm
tools/winapi/winapi_parser.pm
+3
-3
No files found.
tools/winapi/winapi_function.pm
View file @
eb3fec1b
...
...
@@ -309,7 +309,7 @@ sub calling_convention16($) {
}
elsif
(
/^(?:VFWAPIV|WINAPIV)$/
)
{
if
(
!
defined
(
$suffix
))
{
return
undef
;
}
return
"pascal$suffix"
;
# FIXME: Is this correct?
}
elsif
(
/^(?:__stdcall|NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
}
elsif
(
/^(?:__stdcall|
__RPC_STUB|
NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
if
(
!
defined
(
$suffix
))
{
return
undef
;
}
return
"pascal$suffix"
;
}
elsif
(
$_
eq
"__asm"
)
{
...
...
@@ -327,7 +327,7 @@ sub calling_convention32($) {
return
"cdecl"
;
}
elsif
(
/^(?:VFWAPIV|WINAPIV)$/
)
{
return
"varargs"
;
}
elsif
(
/^(?:__stdcall|NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
}
elsif
(
/^(?:__stdcall|
__RPC_STUB|
NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
return
"stdcall"
;
}
elsif
(
$_
eq
"__asm"
)
{
return
"asm"
;
...
...
tools/winapi/winapi_local.pm
View file @
eb3fec1b
...
...
@@ -85,7 +85,7 @@ sub _check_function($$$$$$) {
$implemented_calling_convention
=
"cdecl"
;
}
elsif
(
$calling_convention
=~
/^(?:VFWAPIV|WINAPIV)$/
)
{
$implemented_calling_convention
=
"varargs"
;
}
elsif
(
$calling_convention
=~
/^(?:__stdcall|NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
}
elsif
(
$calling_convention
=~
/^(?:__stdcall|
__RPC_STUB|
NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
if
(
defined
(
$implemented_return_kind
)
&&
$implemented_return_kind
=~
/^(?:s_word|word|void)$/
)
{
$implemented_calling_convention
=
"pascal16"
;
}
else
{
...
...
@@ -101,7 +101,7 @@ sub _check_function($$$$$$) {
$implemented_calling_convention
=
"cdecl"
;
}
elsif
(
$calling_convention
=~
/^(?:VFWAPIV|WINAPIV)$/
)
{
$implemented_calling_convention
=
"varargs"
;
}
elsif
(
$calling_convention
=~
/^(?:__stdcall|NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
}
elsif
(
$calling_convention
=~
/^(?:__stdcall|
__RPC_STUB|
NET_API_FUNCTION|RPC_ENTRY|VFWAPI|WINAPI|CALLBACK)$/
)
{
if
(
defined
(
$implemented_return_kind
)
&&
$implemented_return_kind
eq
"longlong"
)
{
$implemented_calling_convention
=
"stdcall"
;
# FIXME: Check entry flags
}
else
{
...
...
tools/winapi/winapi_parser.pm
View file @
eb3fec1b
...
...
@@ -372,7 +372,7 @@ sub parse_c_file($$) {
}
next
;
}
elsif
(
/
(
extern
\
s
+|
static
\
s
+
)?((
struct
\
s
+|
union
\
s
+|
enum
\
s
+|
signed
\
s
+|
unsigned
\
s
+
)?
\
w
+
((
\
s
*\*
)
+\
s
*|\
s
+
))
((
__cdecl
|
__stdcall
|
CDECL
|
NET_API_FUNCTION
|
RPC_ENTRY
|
VFWAPIV
|
VFWAPI
|
WINAPIV
|
WINAPI
|
CALLBACK
)
\
s
+
)?
((
__cdecl
|
__stdcall
|
__RPC_STUB
|
CDECL
|
NET_API_FUNCTION
|
RPC_ENTRY
|
VFWAPIV
|
VFWAPI
|
WINAPIV
|
WINAPI
|
CALLBACK
)
\
s
+
)?
(
\
w
+
(
\
(
\
w
+\
))?)
\
s
*\
((
.*
?)
\
)
\
s
*
(
\
{
|\
;)
/
sx
)
{
my
@lines
=
split
(
/\n/
,
$&
);
...
...
@@ -448,8 +448,8 @@ sub parse_c_file($$) {
((?:
struct
\
s
+|
union
\
s
+|
enum
\
s
+|
register
\
s
+|
(?:
signed
\
s
+|
unsigned
\
s
+
)
(?:
short
\
s
+
(?
=
int
)
|
long
\
s
+
(?
=
int
))?)?
\
w
+
)
\
s
*
((?:
const
|
volatile
)?
\
s
*
(?:
\*\
s
*
(?:
const
|
volatile
)?
\
s
*
?)
*
)
\
s
*
(?:
__cdecl
\
s
+|
__stdcall
\
s
+|
CALLBACK
\
s
+|
CDECL
\
s
+|
NET_API_FUNCTION
\
s
+|
RPC_ENTRY
\
s
+|
STDMETHODCALLTYPE
\
s
+|
VFWAPIV
\
s
+|
VFWAPI
\
s
+|
WINAPIV
\
s
+|
WINAPI
\
s
+
)?
\
(
\
s
*
(?:
__cdecl
|
__stdcall
|
CALLBACK
|
CDECL
|
NET_API_FUNCTION
|
RPC_ENTRY
|
STDMETHODCALLTYPE
|
VFWAPIV
|
VFWAPI
|
WINAPIV
|
WINAPI
)?
\
s
*\*\
s
*
((?:
\
w
+
)?)
\
s
*\
)
\
s
*
(?:
__cdecl
\
s
+|
__stdcall
\
s
+|
__RPC_STUB
\
s
+|
CALLBACK
\
s
+|
CDECL
\
s
+|
NET_API_FUNCTION
\
s
+|
RPC_ENTRY
\
s
+|
STDMETHODCALLTYPE
\
s
+|
VFWAPIV
\
s
+|
VFWAPI
\
s
+|
WINAPIV
\
s
+|
WINAPI
\
s
+
)?
\
(
\
s
*
(?:
__cdecl
|
__stdcall
|
__RPC_STUB
|
CALLBACK
|
CDECL
|
NET_API_FUNCTION
|
RPC_ENTRY
|
STDMETHODCALLTYPE
|
VFWAPIV
|
VFWAPI
|
WINAPIV
|
WINAPI
)?
\
s
*\*\
s
*
((?:
\
w
+
)?)
\
s
*\
)
\
s
*
\
(
\
s
*
(
.*
?)
\
s
*\
)
$
/
x
)
{
my
$return_type
=
$1
;
...
...
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