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

2008-06-14 09:35 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* contrib/hbw32/w32_ole.c
     * Fix to previous commit.
This commit is contained in:
Viktor Szakats
2008-06-14 07:37:39 +00:00
parent 274682d374
commit 02e6dda735
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -8,6 +8,10 @@
2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2008-06-14 09:35 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* contrib/hbw32/w32_ole.c
* Fix to previous commit.
2008-06-14 09:13 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* contrib/hbbmcdx/bmdbfcdx1.c
* contrib/hbct/ctnet.c

2
harbour/contrib/hbw32/w32_ole.c
View File

@@ -943,7 +943,7 @@ static PHB_ITEM SafeArrayToArray( SAFEARRAY *parray, UINT iDim, long* rgIndices,
if( vt == VT_I1 || vt == VT_UI1 )
{
// Ugly hack, but needed to allocate our signature as hidden bytes!
hb_itemPutCL( pArray, NULL );
hb_itemPutC( pArray, NULL );
HB_STRING_ALLOC( pArray, (ULONG)(iLen + 5) );
pArray->item.asString.length = iLen; // TOFIX