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

2008-06-04 15:48 UTC+0100 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* source/rtl/hbbit.c
     + Added important NOTE about hb_bit*() functions' 
       relation to the compiler optimization engine.

   * source/vm/fm.c
   * source/vm/extrap.c
     * Log filenames converted to static variables. With the 
       intent that they'll be converted to Set()s or similar 
       user settable values in the future, since it's useful 
       and more elegant to redirect these to the app's normal 
       logfile.

   * contrib/hbsqlit3/hbsqlit3.c
     * Minor formatting.
This commit is contained in:
Viktor Szakats
2008-06-04 13:53:05 +00:00
parent 8d3c0f4d2e
commit bd6e69b714
5 changed files with 34 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
harbour/ChangeLog
View File

@@ -8,6 +8,22 @@
2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2008-06-04 15:48 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
* source/rtl/hbbit.c
+ Added important NOTE about hb_bit*() functions'
relation to the compiler optimization engine.
* source/vm/fm.c
* source/vm/extrap.c
* Log filenames converted to static variables. With the
intent that they'll be converted to Set()s or similar
user settable values in the future, since it's useful
and more elegant to redirect these to the app's normal
logfile.
* contrib/hbsqlit3/hbsqlit3.c
* Minor formatting.
2008-06-04 14:27 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
* contrib/hbsqlit2/hbsqlit2.c
* Further cleanup, optimizations.

10
harbour/contrib/hbsqlit3/hbsqlit3.c
View File

@@ -1096,13 +1096,13 @@ HB_FUNC( SQLITE3_ENABLE_SHARED_CACHE )
}
/*
Tracing And Profiling Functions
Tracing And Profiling Functions
sqlite3_trace( db, lOnOff )
sqlite3_profile( db, lOnOff )
sqlite3_trace( db, lOnOff )
sqlite3_profile( db, lOnOff )
*/
static void SQL3ProfileLog( void *sFile, const char *sProfileMsg, sqlite3_uint64 int64 )
static void SQL3ProfileLog( void * sFile, const char * sProfileMsg, sqlite3_uint64 int64 )
{
if( sProfileMsg )
{
@@ -1116,7 +1116,7 @@ static void SQL3ProfileLog( void *sFile, const char *sProfileMsg, sqlite3_uint64
}
}
static void SQL3TraceLog( void *sFile, const char *sTraceMsg )
static void SQL3TraceLog( void * sFile, const char * sTraceMsg )
{
if( sTraceMsg )
{

7
harbour/source/rtl/hbbit.c
View File

@@ -53,6 +53,13 @@
#include "hbapi.h"
#include "hbapierr.h"
/* NOTE: IMPORTANT:
hb_bit*() Harbour level function names and logic are embedded
in the compiler optimization engine, so in any case these
function have to be changed, updated or extended, don't forget
to update the references in the compiler as well.
[vszakats] */
static BOOL hb_numParam( int iParam, HB_LONG * plNum )
{
if( ISNUM( iParam ) )

4
harbour/source/vm/extrap.c
View File

@@ -60,6 +60,8 @@
#if defined(HB_OS_WIN_32) && !defined(HB_WINCE)
static char * s_pszLogFileName = "hb_ex.log";
LONG WINAPI hb_win32ExceptionHandler( struct _EXCEPTION_POINTERS * ExceptionInfo )
{
char msg[ ( HB_SYMBOL_NAME_LEN + HB_SYMBOL_NAME_LEN + 32 ) * 32 ];
@@ -68,7 +70,7 @@ LONG WINAPI hb_win32ExceptionHandler( struct _EXCEPTION_POINTERS * ExceptionInfo
USHORT uiLine;
int iLevel;
FILE * hLog = hb_fopen( "hb_ex.log", "a+" );
FILE * hLog = hb_fopen( s_pszLogFileName, "a+" );
if( hLog )
{

4
harbour/source/vm/fm.c
View File

@@ -155,6 +155,8 @@ static LONG s_lMemoryConsumed = 0; /* memory max size consumed */
static PHB_MEMINFO s_pFirstBlock = NULL;
static PHB_MEMINFO s_pLastBlock = NULL;
static char * s_pszLogFileName = "hb_fm.log";
#else /* ! HB_FM_STATISTICS */
typedef void * PHB_MEMINFO;
@@ -583,7 +585,7 @@ HB_EXPORT void hb_xexit( void ) /* Deinitialize fixed memory subsystem */
FILE * hLog = NULL;
if( s_lMemoryBlocks )
hLog = hb_fopen( "hb_fm.log", "a+" );
hLog = hb_fopen( s_pszLogFileName, "a+" );
hb_conOutErr( hb_conNewLine(), 0 );
hb_conOutErr( "----------------------------------------", 0 );