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

2008-07-09 10:00 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* source/rtl/gtwvt/gtwvt.c
   * contrib/gtwvg/gtwvg.c
     ! Restored previous change.
       In Harbour, passing NULL to hb_itemPutC() is valid and 
       will result in an empty string being stored in an optimized way.
       hb_itemPutCLPtr() should be used instead of hb_itemPutCPtr().
       The GPF in question used to happen when setting the clipboard, 
       and it looks to happen inside the OS. I'm still investigating.

   * contrib/hbapollo/tests/bld_b32.bat
   * contrib/hbapollo/tests/bld_vc.bat
     ! Fixed external .lib name.
This commit is contained in:
Viktor Szakats
2008-07-09 08:02:03 +00:00
parent 80f2c9b417
commit 8735002f43
5 changed files with 19 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
harbour/ChangeLog
View File

@@ -8,6 +8,20 @@
2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2008-07-09 10:00 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* source/rtl/gtwvt/gtwvt.c
* contrib/gtwvg/gtwvg.c
! Restored previous change.
In Harbour, passing NULL to hb_itemPutC() is valid and
will result in an empty string being stored in an optimized way.
hb_itemPutCLPtr() should be used instead of hb_itemPutCPtr().
The GPF in question used to happen when setting the clipboard,
and it looks to happen inside the OS. I'm still investigating.
* contrib/hbapollo/tests/bld_b32.bat
* contrib/hbapollo/tests/bld_vc.bat
! Fixed external .lib name.
2008-07-08 16:45 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* contrib/gtwvg/gtwvg.c
* source/rtl/gtwvt/gtwvt.c

2
harbour/contrib/gtwvg/gtwvg.c
View File

@@ -2472,7 +2472,7 @@ static BOOL hb_gt_wvt_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo )
}
else
{
pInfo->pResult = hb_itemPutC( pInfo->pResult, "" );
pInfo->pResult = hb_itemPutC( pInfo->pResult, NULL );
}
}
break;

2
harbour/contrib/hbapollo/tests/bld_b32.bat
View File

@@ -9,6 +9,6 @@ if "%HB_INC_INSTALL%" == "" set HB_INC_INSTALL=..\..\..\include
set HB_ARCHITECTURE=w32
set HB_COMPILER=bcc32
set HB_USER_LIBS=hbapollo.lib sde60.lib
set HB_USER_LIBS=hbapollo.lib sde61.lib
call %HB_BIN_INSTALL%\bld.bat %1 %2 %3 %4 %5 %6 %7 %8 %9

2
harbour/contrib/hbapollo/tests/bld_vc.bat
View File

@@ -9,6 +9,6 @@ if "%HB_INC_INSTALL%" == "" set HB_INC_INSTALL=..\..\..\include
set HB_ARCHITECTURE=w32
set HB_COMPILER=msvc
set HB_USER_LIBS=hbapollo.lib sde60.lib
set HB_USER_LIBS=hbapollo.lib sde61.lib
call %HB_BIN_INSTALL%\bld.bat %1 %2 %3 %4 %5 %6 %7 %8 %9

4
harbour/source/rtl/gtwvt/gtwvt.c
View File

@@ -2113,13 +2113,13 @@ static BOOL hb_gt_wvt_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo )
CF_OEMTEXT : CF_TEXT,
&szClipboardData, &ulLen ) )
{
pInfo->pResult = hb_itemPutCPtr( pInfo->pResult,
pInfo->pResult = hb_itemPutCLPtr( pInfo->pResult,
szClipboardData,
ulLen );
}
else
{
pInfo->pResult = hb_itemPutC( pInfo->pResult, "" );
pInfo->pResult = hb_itemPutC( pInfo->pResult, NULL );
}
}
break;