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

2013-01-10 16:21 UTC+0100 Viktor Szakats (harbour syenar.net)

Browse Source 
* contrib/hbmysql/tmysql.prg
    ! commented code converted to #if 0 block
    ! indentation

  * contrib/3rd/sqlite3/*
  * contrib/3rd/sqlite3/sqlite3.hbp
    ! updated to 3.7.15.2
This commit is contained in:
Viktor Szakats
2013-01-10 15:23:52 +00:00
parent dbe68f1a1f
commit af3c47f30e
6 changed files with 24 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
harbour/ChangeLog.txt
View File

@@ -10,6 +10,15 @@
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
*/
2013-01-10 16:21 UTC+0100 Viktor Szakats (harbour syenar.net)
* contrib/hbmysql/tmysql.prg
! commented code converted to #if 0 block
! indentation
* contrib/3rd/sqlite3/*
* contrib/3rd/sqlite3/sqlite3.hbp
! updated to 3.7.15.2
2013-01-03 13:30 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* harbour/src/rtl/hbcom.c
+ added translation for some OS error codes

8
harbour/contrib/3rd/sqlite3/sqlite3.c
View File

@@ -1,6 +1,6 @@
/******************************************************************************
** This file is an amalgamation of many separate C source files from SQLite
** version 3.7.15.1. By combining all the individual C code files into this
** version 3.7.15.2. By combining all the individual C code files into this
** single large file, the entire code can be compiled as a single translation
** unit. This allows many compilers to do optimizations that would not be
** possible if the files were compiled separately. Performance improvements
@@ -673,9 +673,9 @@ extern "C" {
** [sqlite3_libversion_number()], [sqlite3_sourceid()],
** [sqlite_version()] and [sqlite_source_id()].
*/
#define SQLITE_VERSION "3.7.15.1"
#define SQLITE_VERSION "3.7.15.2"
#define SQLITE_VERSION_NUMBER 3007015
#define SQLITE_SOURCE_ID "2012-12-19 20:39:10 6b85b767d0ff7975146156a99ad673f2c1a23318"
#define SQLITE_SOURCE_ID "2013-01-09 11:53:05 c0e09560d26f0a6456be9dd3447f5311eb4f238f"
/*
** CAPI3REF: Run-Time Library Version Numbers
@@ -105732,7 +105732,7 @@ static void bestBtreeIndex(WhereBestIdx *p){
pc.plan.nOBSat = isSortingIndex(p, pProbe, iCur, &bRev);
WHERETRACE((" --> after isSortingIndex: bRev=%d nOBSat=%d\n",
bRev, pc.plan.nOBSat));
if( nPriorSat<pc.plan.nOBSat || (pc.plan.wsFlags & WHERE_UNIQUE)!=0 ){
if( nPriorSat<pc.plan.nOBSat || (pc.plan.wsFlags & WHERE_ALL_UNIQUE)!=0 ){
pc.plan.wsFlags |= WHERE_ORDERED;
}
if( nOrderBy==pc.plan.nOBSat ){

4
harbour/contrib/3rd/sqlite3/sqlite3.dif
View File

@@ -1,6 +1,6 @@
diff -urN sqlite3.orig\sqlite3.c sqlite3\sqlite3.c
--- sqlite3.orig\sqlite3.c Thu Dec 27 01:50:29 2012
+++ sqlite3\sqlite3.c Thu Dec 27 01:50:30 2012
--- sqlite3.orig\sqlite3.c Thu Jan 10 16:22:50 2013
+++ sqlite3\sqlite3.c Thu Jan 10 16:22:50 2013
@@ -26421,7 +26421,11 @@
** is the same technique used by glibc to implement posix_fallocate()
** on systems that do not have a real fallocate() system call.

4
harbour/contrib/3rd/sqlite3/sqlite3.h
View File

@@ -107,9 +107,9 @@ extern "C" {
** [sqlite3_libversion_number()], [sqlite3_sourceid()],
** [sqlite_version()] and [sqlite_source_id()].
*/
#define SQLITE_VERSION "3.7.15.1"
#define SQLITE_VERSION "3.7.15.2"
#define SQLITE_VERSION_NUMBER 3007015
#define SQLITE_SOURCE_ID "2012-12-19 20:39:10 6b85b767d0ff7975146156a99ad673f2c1a23318"
#define SQLITE_SOURCE_ID "2013-01-09 11:53:05 c0e09560d26f0a6456be9dd3447f5311eb4f238f"
/*
** CAPI3REF: Run-Time Library Version Numbers

4
harbour/contrib/3rd/sqlite3/sqlite3.hbp
View File

@@ -45,8 +45,8 @@
sqlite3.c
# ORIGIN http://www.sqlite.org/
# VER 3.7.15.1
# URL http://www.sqlite.org/sqlite-amalgamation-3071501.zip
# VER 3.7.15.2
# URL http://www.sqlite.org/sqlite-amalgamation-3071502.zip
# DIFF sqlite3.dif
#
# MAP sqlite3.c

8
harbour/contrib/hbmysql/tmysql.prg
View File

@@ -1013,7 +1013,7 @@ METHOD Append( oRow, lRefresh ) CLASS TMySQLTable
#if 0
/* was same values from FieldGet( i ) ! */
FOR i := 1 TO ::nNumFields
::aOldValue[ i ] := ::FieldGet( i )
::aOldValue[ i ] := ::FieldGet( i )
NEXT
#endif
ENDIF
@@ -1546,7 +1546,8 @@ METHOD TableStruct( cTable ) CLASS TMySQLServer
HB_SYMBOL_UNUSED( cTable )
/* TODO: rewrite for MySQL
#if 0
/* TODO: rewrite for MySQL */
LOCAL nRes, aField, aStruct, aSField, i
aStruct := {}
@@ -1608,7 +1609,8 @@ METHOD TableStruct( cTable ) CLASS TMySQLServer
ENDIF
NEXT
ENDIF*/
ENDIF
#endif
RETURN aStruct