2010-01-14 04:47 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)

* src/rtl/mousex.c * src/rdd/dbcmdx.c * contrib/xpp/mousex.c * contrib/xpp/dbcmdx.c * contrib/hbtpathy/tpwin.c * contrib/hbgt/bitflags.c * contrib/hbsqlit3/hbsqlit3.c * contrib/hbnf/fttext.c * contrib/hbnf/putkey.c * contrib/hbclipsm/time.c * contrib/hbtip/utils.c * contrib/hbtip/encmthd.c + BOOL/TRUE/FALSE -> HB_BOOL/HB_TRUE/HB_FALSE * contrib/hbsqlit3/hbsqlit3.c ! Marked local support functions as 'static'. * contrib/hbnf/mouse.c * BOOL -> int % Using hb_arraySet*() API. * contrib/hbgd/gdwrp.c ! Added missing hb_numToHandle() calls.
2010-01-14 03:48:59 +00:00
parent 80cd36488b
commit 1cce9df65f
15 changed files with 115 additions and 98 deletions
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,31 @@
   past entries belonging to author(s): Viktor Szakats.
 */

+2010-01-14 04:47 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
+  * src/rtl/mousex.c
+  * src/rdd/dbcmdx.c
+  * contrib/xpp/mousex.c
+  * contrib/xpp/dbcmdx.c
+  * contrib/hbtpathy/tpwin.c
+  * contrib/hbgt/bitflags.c
+  * contrib/hbsqlit3/hbsqlit3.c
+  * contrib/hbnf/fttext.c
+  * contrib/hbnf/putkey.c
+  * contrib/hbclipsm/time.c
+  * contrib/hbtip/utils.c
+  * contrib/hbtip/encmthd.c
+    + BOOL/TRUE/FALSE -> HB_BOOL/HB_TRUE/HB_FALSE
+
+  * contrib/hbsqlit3/hbsqlit3.c
+    ! Marked local support functions as 'static'.
+
+  * contrib/hbnf/mouse.c
+    * BOOL -> int
+    % Using hb_arraySet*() API.
+
+  * contrib/hbgd/gdwrp.c
+    ! Added missing hb_numToHandle() calls.
+
 2010-01-14 04:04 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
  * src/rtl/binnumx.c
  * contrib/xpp/binnumx.c
--- a/harbour/contrib/hbclipsm/time.c
+++ b/harbour/contrib/hbclipsm/time.c
@@ -99,7 +99,7 @@ HB_FUNC( TIMEDIFF )
 HB_FUNC( TIMEISVALID )
 {
   const char * pszTime = hb_parc( 1 );
-   BOOL bRet = FALSE;
+   HB_BOOL bRet = HB_FALSE;

   if( pszTime )
   {
@@ -107,7 +107,7 @@ HB_FUNC( TIMEISVALID )
          atol( pszTime + 3 ) < 60 &&
          atol( pszTime + 6 ) < 60 )
      {
-         bRet = TRUE;
+         bRet = HB_TRUE;
      }
   }

--- a/harbour/contrib/hbgd/gdwrp.c
+++ b/harbour/contrib/hbgd/gdwrp.c
@@ -371,7 +371,7 @@ static void GDImageCreateFrom( int nType )
     )
   {
      /* Retrieve file handle */
-      HB_FHANDLE fhandle = HB_ISNUM( 1 ) ? hb_parnint( 1 ) : 0; /* 0 = std input */
+      HB_FHANDLE fhandle = HB_ISNUM( 1 ) ? hb_numToHandle( hb_parnint( 1 ) ) : 0; /* 0 = std input */

      /* Retrieve image size */
      sz     = hb_parni( 2 );
@@ -529,7 +529,10 @@ static void GDImageSaveTo( int nType )
      else if( HB_ISNUM( 2 ) )
      {
         /* Write to std output or to a passed file */
-         HB_FHANDLE fhandle = ( hb_parnint( 2 ) != FS_ERROR ) ? hb_parnint( 2 ) : 1; /* 1 = std output */
+         HB_FHANDLE fhandle = hb_numToHandle( hb_parnint( 2 ) );
+
+         if( fhandle == FS_ERROR )
+            fhandle = 1; /* 1 = std output */

         /* Write Image */
         SaveImageToHandle( fhandle, iptr, sz );
@@ -3698,7 +3701,7 @@ HB_FUNC( GDIMAGEGIFANIMBEGIN )
      else if( HB_ISNUM( 2 ) || HB_ISNIL( 2 ) )
      {
         /* Retrieve file handle */
-         HB_FHANDLE fhandle = HB_ISNUM( 2 ) ? hb_parnint( 2 ) : 1; /* 1 = std output */
+         HB_FHANDLE fhandle = HB_ISNUM( 2 ) ? hb_numToHandle( hb_parnint( 2 ) ) : 1; /* 1 = std output */

         SaveImageToHandle( fhandle, iptr, size );
      }
@@ -3754,7 +3757,7 @@ HB_FUNC( GDIMAGEGIFANIMADD )
      else if( HB_ISNUM( 2 ) || HB_ISNIL( 2 ) )
      {
         /* Retrieve file handle */
-         HB_FHANDLE fhandle = HB_ISNUM( 2 ) ? hb_parnint( 2 ) : 1; /* 1 = std output */
+         HB_FHANDLE fhandle = HB_ISNUM( 2 ) ? hb_numToHandle( hb_parnint( 2 ) ) : 1; /* 1 = std output */

         SaveImageToHandle( fhandle, iptr, size );
      }
@@ -3793,7 +3796,7 @@ HB_FUNC( GDIMAGEGIFANIMEND )
      else if( HB_ISNUM( 2 ) || HB_ISNIL( 2 ) )
      {
         /* Retrieve file handle */
-         HB_FHANDLE fhandle = HB_ISNUM( 1 ) ? hb_parnint( 1 ) : 1; /* 1 = std output */
+         HB_FHANDLE fhandle = HB_ISNUM( 1 ) ? hb_numToHandle( hb_parnint( 1 ) ) : 1; /* 1 = std output */

         SaveImageToHandle( fhandle, iptr, size );
      }
--- a/harbour/contrib/hbgt/bitflags.c
+++ b/harbour/contrib/hbgt/bitflags.c
@@ -151,7 +151,7 @@ HB_FUNC( GT_CLRFLAG )
 HB_FUNC( GT_ISFLAG  )
 {

-        BOOL            FlagStatus = FALSE;
+        HB_BOOL         FlagStatus = HB_FALSE;
        unsigned        Bit        = 1;
        unsigned        BitPointer;
        unsigned        BytePointer;
--- a/harbour/contrib/hbnf/fttext.c
+++ b/harbour/contrib/hbnf/fttext.c
@@ -192,7 +192,7 @@ static int _ins_buff( int bytes );
 static int _del_buff( int bytes );
 static long _ft_skip( long recs );
 static int _writeLine( const char * theData, ULONG iDataLen );
-static BOOL _writeeol( HB_FHANDLE fhnd );
+static HB_BOOL _writeeol( HB_FHANDLE fhnd );

 /* arrays used by the text workareas */
 static int        area = 0;
@@ -1974,7 +1974,7 @@ static int _writeLine( const char * theData, ULONG iDataLen )
   return err;
 }

-static BOOL _writeeol( HB_FHANDLE fhnd )
+static HB_BOOL _writeeol( HB_FHANDLE fhnd )
 {
   const char * crlf = hb_conNewLine();
   ULONG len = strlen( crlf );
--- a/harbour/contrib/hbnf/mouse.c
+++ b/harbour/contrib/hbnf/mouse.c
@@ -436,7 +436,7 @@ HB_FUNC( _M_MBUTPRS )
   int inX;
   int inY;
   int inButton;
-   BOOL lStatus;
+   int lStatus;
 #if defined( HB_OS_DOS )
   {
      union REGS regs;
@@ -458,24 +458,14 @@ HB_FUNC( _M_MBUTPRS )
   }
 #endif
   {
-      PHB_ITEM pArray =     hb_itemArrayNew( 4 );
-      PHB_ITEM pY =         hb_itemPutNI( NULL, inY );
-      PHB_ITEM pX =         hb_itemPutNI( NULL, inX );
-      PHB_ITEM pButton =    hb_itemPutNI( NULL, inButton );
-      PHB_ITEM pStatus =    hb_itemPutNI( NULL, lStatus );
+      PHB_ITEM pArray = hb_itemArrayNew( 4 );

-      hb_itemArrayPut( pArray, 1, pButton ); /* NOTE: I've changed 1 to 3 */
-      hb_itemArrayPut( pArray, 2, pX );
-      hb_itemArrayPut( pArray, 3, pY );
-      hb_itemArrayPut( pArray, 4, pStatus ); /* NOTE: I've changed 1 to 3 */
+      hb_arraySetNI( pArray, 1, inButton ); /* NOTE: I've changed 1 to 3 */
+      hb_arraySetNI( pArray, 2, inX );
+      hb_arraySetNI( pArray, 3, inY );
+      hb_arraySetNI( pArray, 4, lStatus ); /* NOTE: I've changed 1 to 3 */

-      hb_itemReturn( pArray );
-
-      hb_itemRelease( pArray );
-      hb_itemRelease( pX );
-      hb_itemRelease( pY );
-      hb_itemRelease( pStatus );
-      hb_itemRelease( pButton );
+      hb_itemReturnRelease( pArray );
   }
 }

--- a/harbour/contrib/hbnf/putkey.c
+++ b/harbour/contrib/hbnf/putkey.c
@@ -245,7 +245,7 @@ End

 HB_FUNC( FT_PUTKEY )
 {
-   BOOL lSuccess = FALSE;
+   HB_BOOL lSuccess = HB_FALSE;

   if( HB_ISNUM( 1 ) )
   {
@@ -254,7 +254,7 @@ HB_FUNC( FT_PUTKEY )
      if( iKey >= -39 && iKey <= 385 )
      {
         hb_inkeyPut( iKey );
-         lSuccess = TRUE;
+         lSuccess = HB_TRUE;
      }
   }
   hb_retl( lSuccess );
--- a/harbour/contrib/hbsqlit3/hbsqlit3.c
+++ b/harbour/contrib/hbsqlit3/hbsqlit3.c
@@ -75,11 +75,12 @@
 #ifdef SQLITE3_LIB
 extern char *sqlite3_temp_directory;
 #endif /* SQLITE3_LIB */
-PHB_ITEM    hb_sqlite3_itemPut( PHB_ITEM pItem, void *pMemAddr, int iType );
-void        *hb_sqlite3_itemGet( PHB_ITEM pItem, int iType, BOOL fError );
-void        hb_sqlite3_ret( void *pMemAddr, int iType );
-void        *hb_sqlite3_param( int iParam, int iType, BOOL fError );
-BOOL        hb_sqlite3_store( void *pMemAddr, int iType, int iParam );
+
+static PHB_ITEM hb_sqlite3_itemPut( PHB_ITEM pItem, void *pMemAddr, int iType );
+static void *   hb_sqlite3_itemGet( PHB_ITEM pItem, int iType, HB_BOOL fError );
+static void     hb_sqlite3_ret( void *pMemAddr, int iType );
+static void *   hb_sqlite3_param( int iParam, int iType, HB_BOOL fError );
+static HB_BOOL  hb_sqlite3_store( void *pMemAddr, int iType, int iParam );

 static int  callback( void *, int, char **, char ** );
 static int  authorizer( void *, int, const char *, const char *, const char *, const char * );
@@ -164,13 +165,13 @@ static const HB_GC_FUNCS s_gcSqlite3Funcs =
 };


-PHB_ITEM hb_sqlite3_itemPut( PHB_ITEM pItem, void *pMemAddr, int iType )
+static PHB_ITEM hb_sqlite3_itemPut( PHB_ITEM pItem, void *pMemAddr, int iType )
 {
   PHB_SQLITE3_HOLDER   pStructHolder;

   if( pItem )
   {
-      if( HB_IS_COMPLEX(pItem) )
+      if( HB_IS_COMPLEX( pItem ) )
      {
         hb_itemClear( pItem );
      }
@@ -187,7 +188,7 @@ PHB_ITEM hb_sqlite3_itemPut( PHB_ITEM pItem, void *pMemAddr, int iType )
   return hb_itemPutPtrGC( pItem, pStructHolder );
 }

-void *hb_sqlite3_itemGet( PHB_ITEM pItem, int iType, BOOL fError )
+static void *hb_sqlite3_itemGet( PHB_ITEM pItem, int iType, HB_BOOL fError )
 {
   PHB_SQLITE3_HOLDER   pStructHolder = ( PHB_SQLITE3_HOLDER ) hb_itemGetPtrGC( pItem, &s_gcSqlite3Funcs );
   int                  iError = 0;
@@ -219,26 +220,26 @@ void *hb_sqlite3_itemGet( PHB_ITEM pItem, int iType, BOOL fError )
   return NULL;
 }

-void hb_sqlite3_ret( void *pMemAddr, int iType )
+static void hb_sqlite3_ret( void *pMemAddr, int iType )
 {
   hb_sqlite3_itemPut( hb_stackReturnItem(), pMemAddr, iType );
 }

-void *hb_sqlite3_param( int iParam, int iType, BOOL fError )
+static void *hb_sqlite3_param( int iParam, int iType, HB_BOOL fError )
 {
   return hb_sqlite3_itemGet( hb_param(iParam, HB_IT_POINTER), iType, fError );
 }

-BOOL hb_sqlite3_store( void *pMemAddr, int iType, int iParam )
+static HB_BOOL hb_sqlite3_store( void *pMemAddr, int iType, int iParam )
 {
   PHB_ITEM pItem = hb_param( iParam, HB_IT_BYREF );
   if( !pItem )
   {
-      return FALSE;
+      return HB_FALSE;
   }

   hb_sqlite3_itemPut( pItem, pMemAddr, iType );
-   return TRUE;
+   return HB_TRUE;
 }

 /**
@@ -455,7 +456,7 @@ HB_FUNC( SQLITE3_SHUTDOWN )

 HB_FUNC( SQLITE3_EXTENDED_RESULT_CODES )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -478,7 +479,7 @@ HB_FUNC( SQLITE3_EXTENDED_RESULT_CODES )

 HB_FUNC( SQLITE3_ERRCODE )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -493,7 +494,7 @@ HB_FUNC( SQLITE3_ERRCODE )
 HB_FUNC( SQLITE3_EXTENDED_ERRCODE )
 {
 #if SQLITE_VERSION_NUMBER >= 3006005
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -510,7 +511,7 @@ HB_FUNC( SQLITE3_EXTENDED_ERRCODE )

 HB_FUNC( SQLITE3_ERRMSG )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -541,7 +542,7 @@ HB_FUNC( SQLITE3_SLEEP )

 HB_FUNC( SQLITE3_LAST_INSERT_ROWID )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -556,29 +557,29 @@ HB_FUNC( SQLITE3_LAST_INSERT_ROWID )
 /**
   Name Of The Folder Holding Temporary Files

-   sqlite3_temp_directory( cDirName ) -> lResult (TRUE/FALSE)
+   sqlite3_temp_directory( cDirName ) -> lResult (HB_TRUE/HB_FALSE)
 */

 HB_FUNC( SQLITE3_TEMP_DIRECTORY )
 {
-   BOOL  bResult = FALSE;
+   HB_BOOL  bResult = HB_FALSE;

   #ifdef SQLITE3_LIB
   {
-      BOOL  fFree;
-      char  *pszDirName = hb_fsNameConv( hb_parcx(1), &fFree );
+      HB_BOOL fFree;
+      char *  pszDirName = hb_fsNameConv( hb_parcx( 1 ), &fFree );

      if( hb_fsIsDirectory(pszDirName) )
      {
-         bResult = TRUE;
+         bResult = HB_TRUE;
      }
      else
      {
-         if( hb_parl(2) )  /* create temp directory if not exist */
+         if( hb_parl( 2 ) )  /* create temp directory if not exist */
         {
            if( hb_fsMkDir(pszDirName) )
            {
-               bResult = TRUE;
+               bResult = HB_TRUE;
            }
            else
            {
@@ -686,7 +687,7 @@ HB_FUNC( SQLITE3_OPEN_V2 )

 HB_FUNC( SQLITE3_EXEC )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -744,7 +745,7 @@ HB_FUNC( SQLITE3_EXEC )

 HB_FUNC( SQLITE3_PREPARE )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1136,7 +1137,7 @@ HB_FUNC( SQLITE3_BIND_PARAMETER_NAME )

 HB_FUNC( SQLITE3_CHANGES )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1156,7 +1157,7 @@ HB_FUNC( SQLITE3_CHANGES )

 HB_FUNC( SQLITE3_TOTAL_CHANGES )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1359,7 +1360,7 @@ HB_FUNC( SQLITE3_COLUMN_TEXT )

 HB_FUNC( SQLITE3_ENABLE_LOAD_EXTENSION )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1390,7 +1391,7 @@ HB_FUNC( SQLITE3_RESET_AUTO_EXTENSION )

 HB_FUNC( SQLITE3_BUSY_TIMEOUT )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1410,7 +1411,7 @@ HB_FUNC( SQLITE3_BUSY_TIMEOUT )

 HB_FUNC( SQLITE3_GET_TABLE )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1471,7 +1472,7 @@ HB_FUNC( SQLITE3_GET_TABLE )
 #ifdef SQLITE_ENABLE_COLUMN_METADATA
 HB_FUNC( SQLITE3_TABLE_COLUMN_METADATA )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1501,9 +1502,9 @@ HB_FUNC( SQLITE3_TABLE_COLUMN_METADATA )

         hb_arraySetC( pArray, 1, ( char * ) pzDataType );
         hb_arraySetC( pArray, 2, ( char * ) pzCollSeq );
-         hb_arraySetL( pArray, 3, (BOOL) iNotNull );
-         hb_arraySetL( pArray, 4, (BOOL) iPrimaryKey );
-         hb_arraySetL( pArray, 5, (BOOL) iAutoinc );
+         hb_arraySetL( pArray, 3, ( HB_BOOL ) ( iNotNull != 0 ) );
+         hb_arraySetL( pArray, 4, ( HB_BOOL ) ( iPrimaryKey != 0 ) );
+         hb_arraySetL( pArray, 5, ( HB_BOOL ) ( iAutoinc != 0 ) );

         hb_itemReturnRelease( pArray );
      }
@@ -1580,7 +1581,7 @@ HB_FUNC( SQLITE3_COLUMN_ORIGIN_NAME )

 HB_FUNC( SQLITE3_BLOB_OPEN )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1715,12 +1716,12 @@ HB_FUNC( SQLITE3_BLOB_WRITE )
 /**
    Test To See If The Database Is In Auto-Commit Mode

-    sqlite3_get_autocommit( db ) -> lResult (TRUE/FALSE)
+    sqlite3_get_autocommit( db ) -> lResult (HB_TRUE/HB_FALSE)
 */

 HB_FUNC( SQLITE3_GET_AUTOCOMMIT )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1780,7 +1781,7 @@ static void SQL3TraceLog( void *sFile, const char *sTraceMsg )

 HB_FUNC( SQLITE3_PROFILE )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1794,7 +1795,7 @@ HB_FUNC( SQLITE3_PROFILE )

 HB_FUNC( SQLITE3_TRACE )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1859,7 +1860,7 @@ HB_FUNC( SQLITE3_BUFF_TO_FILE )

 HB_FUNC( SQLITE3_INTERRUPT )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1875,7 +1876,7 @@ HB_FUNC( SQLITE3_INTERRUPT )

 HB_FUNC( SQLITE3_BUSY_HANDLER )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -1937,7 +1938,7 @@ HB_FUNC( SQLITE3_BUSY_HANDLER )

 HB_FUNC( SQLITE3_PROGRESS_HANDLER )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -2000,7 +2001,7 @@ HB_FUNC( SQLITE3_PROGRESS_HANDLER )

 HB_FUNC( SQLITE3_COMMIT_HOOK )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -2056,7 +2057,7 @@ HB_FUNC( SQLITE3_COMMIT_HOOK )

 HB_FUNC( SQLITE3_ROLLBACK_HOOK )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -2118,7 +2119,7 @@ HB_FUNC( SQLITE3_ROLLBACK_HOOK )

 HB_FUNC( SQLITE3_SET_AUTHORIZER )
 {
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db )
   {
@@ -2191,8 +2192,8 @@ HB_FUNC( SQLITE3_SET_AUTHORIZER )
 HB_FUNC( SQLITE3_BACKUP_INIT )
 {
 #if SQLITE_VERSION_NUMBER >= 3006011
-   HB_SQLITE3     *pHbSqlite3Dest = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
-   HB_SQLITE3     *pHbSqlite3Source = ( HB_SQLITE3 * ) hb_sqlite3_param( 3, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3     *pHbSqlite3Dest = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );
+   HB_SQLITE3     *pHbSqlite3Source = ( HB_SQLITE3 * ) hb_sqlite3_param( 3, HB_SQLITE3_DB, HB_TRUE );
   sqlite3_backup *pBackup;

   if( pHbSqlite3Dest && pHbSqlite3Dest->db && pHbSqlite3Source && pHbSqlite3Source->db && HB_ISCHAR(2) && HB_ISCHAR(4) )
@@ -2357,7 +2358,7 @@ HB_FUNC( SQLITE3_DB_STATUS )
 {
 #if SQLITE_VERSION_NUMBER >= 3006001
   int         iCurrent, iHighwater;
-   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, TRUE );
+   HB_SQLITE3  *pHbSqlite3 = ( HB_SQLITE3 * ) hb_sqlite3_param( 1, HB_SQLITE3_DB, HB_TRUE );

   if( pHbSqlite3 && pHbSqlite3->db && (hb_pcount() > 4) && (HB_ISNUM(3) && HB_ISBYREF(3)) && (HB_ISNUM(4) && HB_ISBYREF(4)) )
   {
--- a/harbour/contrib/hbtip/encmthd.c
+++ b/harbour/contrib/hbtip/encmthd.c
@@ -66,7 +66,7 @@ HB_FUNC( TIPENCODERBASE64_ENCODE )
   int nPosBlock = 0, nLineCount = 0;
   ULONG nFinalLen;
   unsigned char cElem, cElem1;
-   BOOL bExcept;
+   HB_BOOL bExcept;

   if( ! cData )
   {
@@ -437,15 +437,13 @@ HB_FUNC( TIPENCODERURL_ENCODE )
 {
   const char *cData = hb_parc( 1 );
   int nLen = hb_parclen( 1 );
-   BOOL bComplete = hb_parl( 2 );
+   HB_BOOL bComplete = hb_parl( 2 );
   char *cRet;
   int nPos = 0, nPosRet = 0, nVal;
   char cElem;

   if( hb_pcount() < 2 )
-   {
-      bComplete = TRUE;
-   }
+      bComplete = HB_TRUE;

   if( ! cData )
   {
--- a/harbour/contrib/hbtip/utils.c
+++ b/harbour/contrib/hbtip/utils.c
@@ -384,7 +384,7 @@ static const char * s_findMimeStringInTree( const char * cData, int iLen, int iE
 static const char * s_findStringMimeType( const char * cData, int iLen )
 {
   int iCount;
-   BOOL bFormFeed;
+   HB_BOOL bFormFeed;

   for( iCount = 0; iCount < MIME_TABLE_SIZE; iCount++ )
   {
@@ -434,18 +434,18 @@ static const char * s_findStringMimeType( const char * cData, int iLen )
   }

   /* Failure; let's see if it's a text/plain. */
-   bFormFeed = FALSE;
+   bFormFeed = HB_FALSE;
   iCount = 0;
   while( iCount < iLen )
   {
      /* form feed? */
      if( cData[ iCount ] == '\x0C' )
-         bFormFeed = TRUE;
+         bFormFeed = HB_TRUE;

      /* esc sequence? */
      else if( cData[ iCount ] == '\x1B' )
      {
-         bFormFeed = TRUE;
+         bFormFeed = HB_TRUE;
         iCount++;
         if( cData[ iCount ] <= 27 )
            iCount++;
--- a/harbour/contrib/hbtpathy/tpwin.c
+++ b/harbour/contrib/hbtpathy/tpwin.c
@@ -165,7 +165,7 @@ HB_FUNC( __TP_ISDCD )
   DWORD dwModemStat = 0;
   BOOL bRet = GetCommModemStatus( ( HANDLE ) ( HB_PTRUINT ) hb_parnint( 1 ), &dwModemStat );

-   hb_retl( bRet ? ( dwModemStat & MS_RLSD_ON ) != 0 : FALSE ); /* The RLSD (receive-line-signal-detect) signal is on. Also is DCD. */
+   hb_retl( bRet ? ( dwModemStat & MS_RLSD_ON ) != 0 : HB_FALSE ); /* The RLSD (receive-line-signal-detect) signal is on. Also is DCD. */
 }

 HB_FUNC( __TP_ISRI )
@@ -173,7 +173,7 @@ HB_FUNC( __TP_ISRI )
   DWORD dwModemStat = 0;
   BOOL bRet = GetCommModemStatus( ( HANDLE ) ( HB_PTRUINT ) hb_parnint( 1 ), &dwModemStat );

-   hb_retl( bRet ? ( dwModemStat & MS_RING_ON ) != 0 : FALSE );
+   hb_retl( bRet ? ( dwModemStat & MS_RING_ON ) != 0 : HB_FALSE );
 }

 HB_FUNC( __TP_ISDSR )
@@ -181,7 +181,7 @@ HB_FUNC( __TP_ISDSR )
   DWORD dwModemStat = 0;
   BOOL bRet = GetCommModemStatus( ( HANDLE ) ( HB_PTRUINT ) hb_parnint( 1 ), &dwModemStat );

-   hb_retl( bRet ? ( dwModemStat & MS_DSR_ON ) != 0 : FALSE );
+   hb_retl( bRet ? ( dwModemStat & MS_DSR_ON ) != 0 : HB_FALSE );
 }

 HB_FUNC( __TP_ISCTS )
@@ -189,7 +189,7 @@ HB_FUNC( __TP_ISCTS )
   DWORD dwModemStat = 0;
   BOOL bRet = GetCommModemStatus( ( HANDLE ) ( HB_PTRUINT ) hb_parnint( 1 ), &dwModemStat );

-   hb_retl( bRet ? ( dwModemStat & MS_CTS_ON ) != 0 : FALSE );
+   hb_retl( bRet ? ( dwModemStat & MS_CTS_ON ) != 0 : HB_FALSE );
 }

 #endif /* HB_OS_WIN */
--- a/harbour/contrib/xpp/dbcmdx.c
+++ b/harbour/contrib/xpp/dbcmdx.c
@@ -80,7 +80,7 @@ HB_FUNC( ORDWILDSEEK )

      if( szPattern )
      {
-         BOOL fCont = hb_parl( 2 ), fBack = hb_parl( 3 ), fFound = FALSE;
+         HB_BOOL fCont = hb_parl( 2 ), fBack = hb_parl( 3 ), fFound = HB_FALSE;
         DBORDERINFO OrderInfo;
         HB_ERRCODE errCode = HB_SUCCESS;

@@ -131,7 +131,7 @@ HB_FUNC( DBSKIPPER )
   {
      LONG lSkipped = 0;
      LONG lRecs = 1;
-      BOOL fBEof;
+      HB_BOOL fBEof;
      ULONG ulRecords = 0;

      if( SELF_RECCOUNT( pArea, &ulRecords ) == HB_SUCCESS && ulRecords > 0 )
--- a/harbour/contrib/xpp/mousex.c
+++ b/harbour/contrib/xpp/mousex.c
@@ -61,7 +61,7 @@ HB_FUNC( NUMBUTTONS )

 HB_FUNC( SETMOUSE )
 {
-   BOOL fRow, fCol;
+   HB_BOOL fRow, fCol;

   hb_retl( hb_mouseGetCursor() );

--- a/harbour/src/rdd/dbcmdx.c
+++ b/harbour/src/rdd/dbcmdx.c
@@ -82,7 +82,7 @@ HB_FUNC( ORDWILDSEEK )

      if( szPattern )
      {
-         BOOL fCont = hb_parl( 2 ), fBack = hb_parl( 3 ), fFound = FALSE;
+         HB_BOOL fCont = hb_parl( 2 ), fBack = hb_parl( 3 ), fFound = HB_FALSE;
         DBORDERINFO OrderInfo;
         HB_ERRCODE errCode = HB_SUCCESS;

@@ -133,7 +133,7 @@ HB_FUNC( DBSKIPPER )
   {
      LONG lSkipped = 0;
      LONG lRecs = 1;
-      BOOL fBEof;
+      HB_BOOL fBEof;
      ULONG ulRecords = 0;

      if( SELF_RECCOUNT( pArea, &ulRecords ) == HB_SUCCESS && ulRecords > 0 )
--- a/harbour/src/rtl/mousex.c
+++ b/harbour/src/rtl/mousex.c
@@ -65,7 +65,7 @@ HB_FUNC( NUMBUTTONS )

 HB_FUNC( SETMOUSE )
 {
-   BOOL fRow, fCol;
+   HB_BOOL fRow, fCol;

   hb_retl( hb_mouseGetCursor() );