fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-04-28 23:54 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/contrib/hbole/olecore.c
    * pacified some GCC warnings
This commit is contained in:
Przemyslaw Czerpak
2009-04-28 21:47:01 +00:00
parent 13fd59f46a
commit 65ac716c4e
2 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -8,6 +8,10 @@
2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
*/
2009-04-28 23:54 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/contrib/hbole/olecore.c
* pacified some GCC warnings
2009-04-28 23:13 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/rdd/dbf1.c
! casting

10
harbour/contrib/hbole/olecore.c
View File

@@ -507,7 +507,7 @@ HB_FUNC( OLEGETACTIVEOBJECT ) /* ( cOleName | cCLSID [, cIID ] ) */
#if HB_OLE_C_API
lOleError = pUnk->lpVtbl->QueryInterface( pUnk, fIID ? &iid : &IID_IDispatch, ( void** ) ( void * ) &pDisp );
#else
lOleError = pUnk->QueryInterface( fIID ? iid : IID_IDispatch, ( void** ) &pDisp );
lOleError = pUnk->QueryInterface( fIID ? iid : IID_IDispatch, ( void** ) ( void * ) &pDisp );
#endif
}
}
@@ -583,16 +583,16 @@ HB_FUNC( __OLEENUMCREATE ) /* ( __hObj ) */
if( variant.n1.n2.vt == VT_UNKNOWN )
#if HB_OLE_C_API
lOleError = ( variant.n1.n2.n3.punkVal )->lpVtbl->QueryInterface( variant.n1.n2.n3.punkVal,
&IID_IEnumVARIANT, ( void** ) &pEnum );
&IID_IEnumVARIANT, ( void** ) ( void * ) &pEnum );
#else
lOleError = ( variant.n1.n2.n3.punkVal )->QueryInterface( IID_IEnumVARIANT, ( void** ) &pEnum );
lOleError = ( variant.n1.n2.n3.punkVal )->QueryInterface( IID_IEnumVARIANT, ( void** ) ( void * ) &pEnum );
#endif
else if( variant.n1.n2.vt == VT_DISPATCH )
#if HB_OLE_C_API
lOleError = ( variant.n1.n2.n3.pdispVal )->lpVtbl->QueryInterface( variant.n1.n2.n3.pdispVal,
&IID_IEnumVARIANT, ( void** ) &pEnum );
&IID_IEnumVARIANT, ( void** ) ( void * ) &pEnum );
#else
lOleError = ( variant.n1.n2.n3.pdispVal )->QueryInterface( IID_IEnumVARIANT, ( void** ) &pEnum );
lOleError = ( variant.n1.n2.n3.pdispVal )->QueryInterface( IID_IEnumVARIANT, ( void** ) ( void * ) &pEnum );
#endif
else
{