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

2014-10-19 14:46 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* src/rtl/gtwvt/gtwvt.c
    * small cleanup in HB_GTI_UNITRANS
This commit is contained in:
Przemysław Czerpak
2014-10-19 14:46:35 +02:00
parent dfc2f42e79
commit 556a6cbc2d
2 changed files with 12 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
ChangeLog.txt
View File

@@ -10,6 +10,10 @@
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
*/
2014-10-19 14:46 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* src/rtl/gtwvt/gtwvt.c
* small cleanup in HB_GTI_UNITRANS
2014-10-17 14:55 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* include/hbrddcdx.h
* src/rdd/dbfcdx/dbfcdx1.c

9
src/rtl/gtwvt/gtwvt.c
View File

@@ -3761,6 +3761,9 @@ static HB_BOOL hb_gt_wvt_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo )
}
}
break;
case HB_GTI_UNITRANS:
break;
#else
case HB_GTI_UNITRANS:
if( pWVT->wcTrans )
@@ -3769,9 +3772,13 @@ static HB_BOOL hb_gt_wvt_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo )
if( hb_itemType( pInfo->pNewVal ) & HB_IT_STRING )
{
if( pWVT->wcTrans )
{
hb_itemFreeC( ( char * ) pWVT->wcTrans );
pWVT->wcTrans = NULL;
}
pWVT->wcTransLen = hb_itemGetCLen( pInfo->pNewVal ) / sizeof( HB_WCHAR );
pWVT->wcTrans = pWVT->wcTransLen == 0 ? NULL :
if( pWVT->wcTransLen > 0 )
pWVT->wcTrans = pWVT->wcTransLen == 0 ? NULL :
( HB_WCHAR * ) hb_itemGetC( pInfo->pNewVal );
}
break;