2017-05-09 10:57 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* contrib/rddads/ads1.c
* src/rdd/workarea.c
* simplified the code and eliminated wrong /* fallthrough */ comments
inside case block reported by Viktor
This commit is contained in:
@@ -10,6 +10,12 @@
|
||||
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
|
||||
*/
|
||||
|
||||
2017-05-09 10:57 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
|
||||
* contrib/rddads/ads1.c
|
||||
* src/rdd/workarea.c
|
||||
* simplified the code and eliminated wrong /* fallthrough */ comments
|
||||
inside case block reported by Viktor
|
||||
|
||||
2017-05-09 09:14 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
|
||||
* contrib/hbwin/olecore.c
|
||||
+ added support for named parameters in OLE method calls,
|
||||
|
||||
@@ -2081,16 +2081,12 @@ static HB_ERRCODE adsFieldInfo( ADSAREAP pArea, HB_USHORT uiIndex, HB_USHORT uiT
|
||||
}
|
||||
#if ADS_LIB_VERSION >= 710
|
||||
case DBS_TYPE:
|
||||
{
|
||||
LPFIELD pField = pArea->area.lpFields + uiIndex - 1;
|
||||
|
||||
if( pField->uiTypeExtended == ADS_CISTRING )
|
||||
if( pArea->area.lpFields[ uiIndex - 1 ].uiTypeExtended == ADS_CISTRING )
|
||||
{
|
||||
hb_itemPutC( pItem, "CICHARACTER" );
|
||||
break;
|
||||
}
|
||||
/* fallthrough */
|
||||
}
|
||||
#endif
|
||||
default:
|
||||
return SUPER_FIELDINFO( &pArea->area, uiIndex, uiType, pItem );
|
||||
|
||||
@@ -1926,20 +1926,9 @@ static HB_ERRCODE hb_waRddInfo( LPRDDNODE pRDD, HB_USHORT uiIndex, HB_ULONG ulCo
|
||||
const char * szExt = hb_setGetMFileExt();
|
||||
char * szResult = szExt ? hb_strdup( szExt ) : NULL;
|
||||
if( hb_itemType( pItem ) & HB_IT_STRING )
|
||||
{
|
||||
hb_setSetItem( HB_SET_MFILEEXT, pItem );
|
||||
if( szResult )
|
||||
hb_itemPutCLPtr( pItem, szResult, strlen( szResult ) );
|
||||
else
|
||||
hb_itemPutC( pItem, NULL );
|
||||
break;
|
||||
}
|
||||
else if( szResult )
|
||||
{
|
||||
hb_itemPutCLPtr( pItem, szResult, strlen( szResult ) );
|
||||
break;
|
||||
}
|
||||
/* fallthrough */ /*return HB_FAILURE */
|
||||
hb_itemPutCPtr( pItem, szResult );
|
||||
break;
|
||||
}
|
||||
case RDDI_TABLEEXT:
|
||||
case RDDI_ORDBAGEXT:
|
||||
|
||||
Reference in New Issue
Block a user