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

2009-09-30 23:15 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/source/rdd/dbf1.c
  * harbour/source/rdd/delim1.c
  * harbour/source/rdd/sdf1.c
  * harbour/source/rdd/dbffpt/dbffpt1.c
  * harbour/source/rdd/dbfntx/dbfntx1.c
  * harbour/source/rdd/dbfnsx/dbfnsx1.c
  * harbour/source/rdd/dbfcdx/dbfcdx1.c
  * harbour/contrib/rddads/ads1.c
  * harbour/contrib/rddads/adsx.c
  * harbour/contrib/rddsql/sqlbase.c
  * harbour/contrib/rddsql/sqlmix.c
  * harbour/contrib/rddsql/sddmy/mysqldd.c
  * harbour/contrib/rddsql/sddpg/pgsqldd.c
  * harbour/contrib/rddsql/sddfb/fbirddd.c
  * harbour/contrib/rddsql/sddodbc/odbcdd.c
    * removed some old xHarbour macros

  * harbour/source/rdd/dbfcdx/dbfcdx1.c
    ! fixed sorting with code pages using accented characters with the
      same weight - it's necessary to disable some optimizations for
      such CPs. Thanks to Jaroslav Janik for the information and example.
This commit is contained in:
Przemyslaw Czerpak
2009-09-30 21:15:30 +00:00
parent 63d7fc1063
commit 1933fc409b
16 changed files with 30 additions and 131 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
harbour/ChangeLog
View File

@@ -17,6 +17,29 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-09-30 23:15 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/rdd/dbf1.c
* harbour/source/rdd/delim1.c
* harbour/source/rdd/sdf1.c
* harbour/source/rdd/dbffpt/dbffpt1.c
* harbour/source/rdd/dbfntx/dbfntx1.c
* harbour/source/rdd/dbfnsx/dbfnsx1.c
* harbour/source/rdd/dbfcdx/dbfcdx1.c
* harbour/contrib/rddads/ads1.c
* harbour/contrib/rddads/adsx.c
* harbour/contrib/rddsql/sqlbase.c
* harbour/contrib/rddsql/sqlmix.c
* harbour/contrib/rddsql/sddmy/mysqldd.c
* harbour/contrib/rddsql/sddpg/pgsqldd.c
* harbour/contrib/rddsql/sddfb/fbirddd.c
* harbour/contrib/rddsql/sddodbc/odbcdd.c
* removed some old xHarbour macros
* harbour/source/rdd/dbfcdx/dbfcdx1.c
! fixed sorting with code pages using accented characters with the
same weight - it's necessary to disable some optimizations for
such CPs. Thanks to Jaroslav Janik for the information and example.
2009-09-30 13:53 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* INSTALL
+ Added links to several new components.

9
harbour/contrib/rddads/ads1.c
View File

@@ -3523,7 +3523,7 @@ static HB_ERRCODE adsForceRel( ADSAREAP pArea )
hb_adsUpdateAreaFlags( pArea );
}
fflush(stdout);
return HB_SUCCESS;
}
@@ -4996,13 +4996,6 @@ HB_FUNC_STATIC( ADSVFP_GETFUNCTABLE )
HB_FUNC( ADS ) { ; }
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
static void hb_adsRddInit( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );

8
harbour/contrib/rddads/adsx.c
View File

@@ -1492,14 +1492,6 @@ HB_FUNC( ADSX_GETFUNCTABLE )
HB_FUNC( ADSX ) { ; }
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC_EXTERN( ADS );
static void hb_adsxRddInit( void * cargo )

9
harbour/contrib/rddsql/sddfb/fbirddd.c
View File

@@ -99,7 +99,6 @@ static SDDNODE firebirddd = {
HB_FUNC_EXTERN( SQLBASE );
static void hb_firebirddd_init( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );
@@ -111,14 +110,6 @@ static void hb_firebirddd_init( void * cargo )
}
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC( SDDFB ) {;}
HB_INIT_SYMBOLS_BEGIN( firebirddd__InitSymbols )

9
harbour/contrib/rddsql/sddmy/mysqldd.c
View File

@@ -118,7 +118,6 @@ static SDDNODE mysqldd =
HB_FUNC_EXTERN( SQLBASE );
static void hb_mysqldd_init( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );
@@ -130,14 +129,6 @@ static void hb_mysqldd_init( void * cargo )
}
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC( SDDMY ) {;}
HB_INIT_SYMBOLS_BEGIN( mysqldd__InitSymbols )

9
harbour/contrib/rddsql/sddodbc/odbcdd.c
View File

@@ -105,7 +105,6 @@ static SDDNODE odbcdd =
HB_FUNC_EXTERN( SQLBASE );
static void hb_odbcdd_init( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );
@@ -117,14 +116,6 @@ static void hb_odbcdd_init( void * cargo )
}
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC( SDDODBC ) {;}
HB_INIT_SYMBOLS_BEGIN( odbcdd__InitSymbols )

9
harbour/contrib/rddsql/sddpg/pgsqldd.c
View File

@@ -118,7 +118,6 @@ static SDDNODE pgsqldd = {
HB_FUNC_EXTERN( SQLBASE );
static void hb_pgsqldd_init( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );
@@ -130,14 +129,6 @@ static void hb_pgsqldd_init( void * cargo )
}
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC( SDDPG ) {;}
HB_INIT_SYMBOLS_BEGIN( sddpostgre__InitSymbols )

10
harbour/contrib/rddsql/sqlbase.c
View File

@@ -1209,18 +1209,8 @@ static void hb_sqlbaseInit( void * cargo )
}
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC( SQLBASE ) {;}
HB_FUNC( SQLBASE_GETFUNCTABLE )
{
RDDFUNCS * pTable;

11
harbour/contrib/rddsql/sqlmix.c
View File

@@ -2281,21 +2281,10 @@ HB_FUNC( SQLMIX_GETFUNCTABLE )
}
}
HB_FUNC( SQLMIX ) { ; }
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC_EXTERN( SQLBASE );
static void hb_sqlmixRddInit( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );

16
harbour/source/rdd/dbf1.c
View File

@@ -2665,9 +2665,9 @@ static HB_ERRCODE hb_dbfRecCount( DBFAREAP pArea, ULONG * pRecCount )
/*
* Obtain physical row number at current WorkArea cursor position.
*/
static HB_ERRCODE hb_dbfRecNo( DBFAREAP pArea, ULONG * ulRecNo )
static HB_ERRCODE hb_dbfRecNo( DBFAREAP pArea, ULONG * pulRecNo )
{
HB_TRACE(HB_TR_DEBUG, ("hb_dbfRecNo(%p, %p)", pArea, ulRecNo));
HB_TRACE(HB_TR_DEBUG, ("hb_dbfRecNo(%p, %p)", pArea, pulRecNo));
if( pArea->lpdbPendingRel )
{
@@ -2675,7 +2675,7 @@ static HB_ERRCODE hb_dbfRecNo( DBFAREAP pArea, ULONG * ulRecNo )
return HB_FAILURE;
}
*ulRecNo = pArea->ulRecNo;
*pulRecNo = pArea->ulRecNo;
return HB_SUCCESS;
}
@@ -2685,7 +2685,7 @@ static HB_ERRCODE hb_dbfRecNo( DBFAREAP pArea, ULONG * ulRecNo )
static HB_ERRCODE hb_dbfRecId( DBFAREAP pArea, PHB_ITEM pRecNo )
{
HB_ERRCODE errCode;
ULONG ulRecNo;
ULONG ulRecNo = 0;
HB_TRACE(HB_TR_DEBUG, ("hb_dbfRecId(%p, %p)", pArea, pRecNo));
@@ -5904,14 +5904,6 @@ HB_FUNC( DBF_GETFUNCTABLE )
hb_retni( HB_FAILURE );
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
static void hb_dbfRddInit( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );

9
harbour/source/rdd/dbfcdx/dbfcdx1.c
View File

@@ -2279,7 +2279,8 @@ static int hb_cdxPageLeafAddKey( LPCDXPAGE pPage, LPCDXKEY pKey )
iPos = iKey * iLen;
if( iKey < pPage->iKeys )
{
iDup = pPage->pKeyBuf[ iPos + iNum + 4 ];
if( !pPage->TagParent->pIndex->pArea->fSortCDP )
iDup = pPage->pKeyBuf[ iPos + iNum + 4 ];
memmove( &pPage->pKeyBuf[ iPos + iLen ], &pPage->pKeyBuf[ iPos ],
iLen * ( pPage->iKeys - iKey ) );
}
@@ -9781,12 +9782,6 @@ static void hb_cdxTagDoIndex( LPCDXTAG pTag, BOOL fReindex )
#endif
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC_EXTERN( _DBF );
#if defined( HB_SIXCDX )

7
harbour/source/rdd/dbffpt/dbffpt1.c
View File

@@ -5306,13 +5306,6 @@ HB_FUNC( DBFBLOB_GETFUNCTABLE )
hb_dbffptRegisterRDD( &s_uiRddIdBLOB );
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
# undef HB_PRG_PCODE_VER
# define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC_EXTERN( _DBF );
static void hb_dbffptRddInit( void * cargo )

8
harbour/source/rdd/dbfnsx/dbfnsx1.c
View File

@@ -8187,14 +8187,6 @@ HB_FUNC( DBFNSX_GETFUNCTABLE )
}
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
# undef HB_PRG_PCODE_VER
# define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC_EXTERN( _DBF );
static void hb_dbfnsxRddInit( void * cargo )

8
harbour/source/rdd/dbfntx/dbfntx1.c
View File

@@ -7799,14 +7799,6 @@ HB_FUNC( DBFNTX_GETFUNCTABLE )
}
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
# undef HB_PRG_PCODE_VER
# define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
HB_FUNC_EXTERN( _DBF );
static void hb_dbfntxRddInit( void * cargo )

8
harbour/source/rdd/delim1.c
View File

@@ -1592,14 +1592,6 @@ HB_FUNC( DELIM_GETFUNCTABLE )
hb_retni( HB_FAILURE );
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
static void hb_delimRddInit( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );

8
harbour/source/rdd/sdf1.c
View File

@@ -1327,14 +1327,6 @@ HB_FUNC( SDF_GETFUNCTABLE )
hb_retni( HB_FAILURE );
}
#define __PRG_SOURCE__ __FILE__
#ifdef HB_PCODE_VER
#undef HB_PRG_PCODE_VER
#define HB_PRG_PCODE_VER HB_PCODE_VER
#endif
static void hb_sdfRddInit( void * cargo )
{
HB_SYMBOL_UNUSED( cargo );