Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
W
wine-cw
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-cw
Commits
2fa16df5
Commit
2fa16df5
authored
Jun 21, 2013
by
Andrew Eikum
Committed by
Alexandre Julliard
Jun 24, 2013
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
oleaut32: Load referenced typelibs in the same architecture.
parent
82376431
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
30 additions
and
11 deletions
+30
-11
typelib.c
dlls/oleaut32/tests/typelib.c
+16
-0
typelib.c
dlls/oleaut32/typelib.c
+14
-11
No files found.
dlls/oleaut32/tests/typelib.c
View file @
2fa16df5
...
...
@@ -1550,6 +1550,11 @@ static void test_CreateTypeLib(void) {
hres
=
ITypeLib_GetTypeInfoOfGuid
(
stdole
,
&
IID_IUnknown
,
&
unknown
);
ok
(
hres
==
S_OK
,
"got %08x
\n
"
,
hres
);
hres
=
ITypeInfo_GetTypeAttr
(
unknown
,
&
typeattr
);
ok
(
hres
==
S_OK
,
"got %08x
\n
"
,
hres
);
ok
(
typeattr
->
cbSizeVft
==
3
*
sizeof
(
void
*
),
"Got wrong cbSizeVft: %u
\n
"
,
typeattr
->
cbSizeVft
);
ITypeInfo_ReleaseTypeAttr
(
unknown
,
typeattr
);
hres
=
ITypeLib_GetTypeInfoOfGuid
(
stdole
,
&
IID_IDispatch
,
&
dispatch
);
ok
(
hres
==
S_OK
,
"got %08x
\n
"
,
hres
);
...
...
@@ -1684,6 +1689,17 @@ static void test_CreateTypeLib(void) {
ok
(
hres
==
S_OK
,
"got %08x
\n
"
,
hres
);
ok
(
hreftype
==
3
,
"hreftype = %d
\n
"
,
hreftype
);
hres
=
ITypeInfo_GetRefTypeInfo
(
interface1
,
hreftype
,
&
ti
);
ok
(
hres
==
S_OK
,
"got %08x
\n
"
,
hres
);
hres
=
ITypeInfo_GetTypeAttr
(
ti
,
&
typeattr
);
ok
(
hres
==
S_OK
,
"got %08x
\n
"
,
hres
);
ok
(
typeattr
->
cbSizeVft
==
12
||
broken
(
typeattr
->
cbSizeVft
==
24
)
/* xp64 */
,
"retrieved IUnknown gave wrong cbSizeVft: %u
\n
"
,
typeattr
->
cbSizeVft
);
ITypeInfo_ReleaseTypeAttr
(
ti
,
typeattr
);
ITypeInfo_Release
(
ti
);
hres
=
ITypeInfo_GetRefTypeOfImplType
(
interface1
,
-
1
,
&
hreftype
);
ok
(
hres
==
TYPE_E_ELEMENTNOTFOUND
,
"got %08x
\n
"
,
hres
);
...
...
dlls/oleaut32/typelib.c
View file @
2fa16df5
...
...
@@ -7433,18 +7433,21 @@ static HRESULT WINAPI ITypeInfo_fnGetRefTypeInfo(
ITypeLib_AddRef
(
pTLib
);
result
=
S_OK
;
}
else
{
BSTR
libnam
;
TRACE
(
"typeinfo in imported typelib that isn't already loaded
\n
"
);
result
=
LoadRegTypeLib
(
TLB_get_guid_null
(
ref_type
->
pImpTLInfo
->
guid
),
ref_type
->
pImpTLInfo
->
wVersionMajor
,
ref_type
->
pImpTLInfo
->
wVersionMinor
,
ref_type
->
pImpTLInfo
->
lcid
,
&
pTLib
);
if
(
FAILED
(
result
))
{
BSTR
libnam
=
SysAllocString
(
ref_type
->
pImpTLInfo
->
name
);
result
=
LoadTypeLib
(
libnam
,
&
pTLib
);
SysFreeString
(
libnam
);
}
result
=
query_typelib_path
(
TLB_get_guid_null
(
ref_type
->
pImpTLInfo
->
guid
),
ref_type
->
pImpTLInfo
->
wVersionMajor
,
ref_type
->
pImpTLInfo
->
wVersionMinor
,
This
->
pTypeLib
->
syskind
,
ref_type
->
pImpTLInfo
->
lcid
,
&
libnam
);
if
(
FAILED
(
result
))
libnam
=
SysAllocString
(
ref_type
->
pImpTLInfo
->
name
);
result
=
LoadTypeLib
(
libnam
,
&
pTLib
);
SysFreeString
(
libnam
);
if
(
SUCCEEDED
(
result
))
{
ref_type
->
pImpTLInfo
->
pImpTypeLib
=
impl_from_ITypeLib
(
pTLib
);
ITypeLib_AddRef
(
pTLib
);
...
...
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