diff --git a/ChangeLog.txt b/ChangeLog.txt index b487ca4846..510ce71622 100644 --- a/ChangeLog.txt +++ b/ChangeLog.txt @@ -7,6 +7,151 @@ Entries may not always be in chronological/commit order. See license at the end of file. */ +2017-09-11 13:12 UTC Viktor Szakats (vszakats users.noreply.github.com) + * contrib/gtqtc/gtqtc1.cpp + * contrib/gtwvg/gtwgud.c + * contrib/gtwvw/wvwdraw.c + * contrib/hbamf/amfdec.c + * contrib/hbamf/amfstdio.c + * contrib/hbbz2io/bz2io.c + * contrib/hbgzio/gzio.c + * contrib/hbhpdf/core.c + * contrib/hbmemio/memio.c + * contrib/hbmisc/irm.c + * contrib/hbmisc/spd.c + * contrib/hbnetio/netiosrv.c + * contrib/hbssl/ssl_sock.c + * contrib/hbwin/olecore.c + * contrib/hbwin/wapi_commctrl.c + * contrib/hbwin/wapi_winuser.c + * contrib/hbwin/win_bmpd.c + * contrib/hbwin/win_misc.c + * contrib/hbzebra/qrcode.c + * contrib/rddads/ads1.c + * contrib/rddads/adsfunc.c + * contrib/rddsql/sqlmix.c + * contrib/sddfb/core.c + * contrib/xhb/cstructc.c + * contrib/xhb/hboutdbg.c + * contrib/xhb/hbserv.c + * include/hbdefs.h + * include/hbexprb.c + * include/hbrddcdx.h + * include/hbthread.h + * include/hbwmain.c + * src/common/hbffind.c + * src/compiler/complex.c + * src/compiler/hbmain.c + * src/compiler/hbopt.c + * src/debug/dbgentry.c + * src/rdd/dbf1.c + * src/rdd/dbfcdx/dbfcdx1.c + * src/rdd/dbffpt/dbffpt1.c + * src/rdd/dbfnsx/dbfnsx1.c + * src/rdd/dbfntx/dbfntx1.c + * src/rdd/hbsix/sxcompr.c + * src/rdd/wacore.c + * src/rdd/workarea.c + * src/rtl/cputime.c + * src/rtl/dates.c + * src/rtl/gtchrmap.c + * src/rtl/gtcrs/gtcrs.c + * src/rtl/gtpca/gtpca.c + * src/rtl/gtsln/gtsln.c + * src/rtl/gtsln/kbsln.c + * src/rtl/gtsln/keytrans.c + * src/rtl/gtstd/gtstd.c + * src/rtl/gttrm/gttrm.c + * src/rtl/gtwvt/gtwvt.c + * src/rtl/gtxwc/gtxwc.c + * src/rtl/hbcom.c + * src/rtl/hbproces.c + * src/rtl/itemseri.c + * src/rtl/langapi.c + * src/rtl/run.c + * src/rtl/sha1.c + * src/rtl/space.c + * src/vm/classes.c + * src/vm/hvm.c + * src/vm/itemapi.c + * src/vm/set.c + * src/vm/thread.c + * convert commented C code to #if 0 blocks, or clean them up in + different ways + (from 3.4 fork) +2017-09-11 13:12 UTC Viktor Szakats (vszakats users.noreply.github.com) + * contrib/gtqtc/gtqtc1.cpp + * contrib/gtwvg/gtwgud.c + * contrib/gtwvw/wvwdraw.c + * contrib/hbamf/amfdec.c + * contrib/hbamf/amfstdio.c + * contrib/hbbz2io/bz2io.c + * contrib/hbgzio/gzio.c + * contrib/hbhpdf/core.c + * contrib/hbmemio/memio.c + * contrib/hbmisc/irm.c + * contrib/hbmisc/spd.c + * contrib/hbnetio/netiosrv.c + * contrib/hbssl/ssl_sock.c + * contrib/hbwin/olecore.c + * contrib/hbwin/wapi_commctrl.c + * contrib/hbwin/wapi_winuser.c + * contrib/hbwin/win_bmpd.c + * contrib/hbwin/win_misc.c + * contrib/hbzebra/qrcode.c + * contrib/rddads/ads1.c + * contrib/rddads/adsfunc.c + * contrib/rddsql/sqlmix.c + * contrib/sddfb/core.c + * contrib/xhb/cstructc.c + * contrib/xhb/hboutdbg.c + * contrib/xhb/hbserv.c + * include/hbdefs.h + * include/hbexprb.c + * include/hbrddcdx.h + * include/hbthread.h + * include/hbwmain.c + * src/common/hbffind.c + * src/compiler/complex.c + * src/compiler/hbmain.c + * src/compiler/hbopt.c + * src/debug/dbgentry.c + * src/rdd/dbf1.c + * src/rdd/dbfcdx/dbfcdx1.c + * src/rdd/dbffpt/dbffpt1.c + * src/rdd/dbfnsx/dbfnsx1.c + * src/rdd/dbfntx/dbfntx1.c + * src/rdd/hbsix/sxcompr.c + * src/rdd/wacore.c + * src/rdd/workarea.c + * src/rtl/cputime.c + * src/rtl/dates.c + * src/rtl/gtchrmap.c + * src/rtl/gtcrs/gtcrs.c + * src/rtl/gtpca/gtpca.c + * src/rtl/gtsln/gtsln.c + * src/rtl/gtsln/kbsln.c + * src/rtl/gtsln/keytrans.c + * src/rtl/gtstd/gtstd.c + * src/rtl/gttrm/gttrm.c + * src/rtl/gtwvt/gtwvt.c + * src/rtl/gtxwc/gtxwc.c + * src/rtl/hbcom.c + * src/rtl/hbproces.c + * src/rtl/itemseri.c + * src/rtl/langapi.c + * src/rtl/run.c + * src/rtl/sha1.c + * src/rtl/space.c + * src/vm/classes.c + * src/vm/hvm.c + * src/vm/itemapi.c + * src/vm/set.c + * src/vm/thread.c + * convert commented C code to #if 0 blocks, or clean them up in + different ways + (from 3.4 fork) + 2017-09-08 21:38 UTC Viktor Szakats (vszakats users.noreply.github.com) * debian/copyright * LICENSE.txt diff --git a/contrib/gtqtc/gtqtc1.cpp b/contrib/gtqtc/gtqtc1.cpp index 633a7fc938..75532fff29 100644 --- a/contrib/gtqtc/gtqtc1.cpp +++ b/contrib/gtqtc/gtqtc1.cpp @@ -2574,7 +2574,9 @@ QTConsole::QTConsole( PHB_GTQTC pStructQTC, QWidget *parnt ) : QWidget( parnt ) /* Warning! Qt::WA_KeyCompression attribute creates problems when * barcode readers are used - some characters are eaten [druzus] */ - /* setAttribute( Qt::WA_KeyCompression ); */ + #if 0 + setAttribute( Qt::WA_KeyCompression ); + #endif /* Qt::WA_InputMethodEnabled disables support for * national characters in few European countries @@ -2582,7 +2584,9 @@ QTConsole::QTConsole( PHB_GTQTC pStructQTC, QWidget *parnt ) : QWidget( parnt ) * If some Asian users needs it then we will have * to enable it optionally [druzus] */ - /* setAttribute( Qt::WA_InputMethodEnabled ); */ + #if 0 + setAttribute( Qt::WA_InputMethodEnabled ); + #endif #if defined( HB_OS_ANDROID ) || defined( HB_OS_IOS ) || defined( HB_OS_WIN_CE ) setInputMethodHints( Qt::ImhNoPredictiveText ); diff --git a/contrib/gtwvg/gtwgud.c b/contrib/gtwvg/gtwgud.c index 6779899fd4..b32d68f1bb 100644 --- a/contrib/gtwvg/gtwgud.c +++ b/contrib/gtwvg/gtwgud.c @@ -1721,7 +1721,13 @@ static HB_BOOL hb_gt_wvt_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo ) break; case HB_GTS_RESETWINDOW: if( pWVT->hWnd ) - UpdateWindow( pWVT->hWnd ); /* hb_gt_wvt_ResetWindowSize( pWVT ); */ + { + #if 0 + hb_gt_wvt_ResetWindowSize( pWVT ); + #else + UpdateWindow( pWVT->hWnd ); + #endif + } break; case HB_GTS_SETTIMER: if( hb_itemType( pInfo->pNewVal2 ) & HB_IT_ARRAY && pWVT->hWnd ) diff --git a/contrib/hbamf/amfdec.c b/contrib/hbamf/amfdec.c index fe30d89771..d1a2466113 100644 --- a/contrib/hbamf/amfdec.c +++ b/contrib/hbamf/amfdec.c @@ -468,7 +468,9 @@ static HB_BOOL amf3_deserialize_array( amfContext * context, PHB_ITEM pItem, HB_ return decode_dynamic_array_AMF3( context, pItem, array_len, mixed ); - /* return HB_TRUE; */ + #if 0 + return HB_TRUE; + #endif } /* Decode a date. */ @@ -583,7 +585,9 @@ static PHB_ITEM class_def_from_classname( /* amfContext * context, */ PHB_ITEM p hb_strfree( pszBuffer ); - /* uiClass = hb_objGetClass( pItem ); */ + #if 0 + uiClass = hb_objGetClass( pItem ); + #endif if( ! uiClass ) return NULL; @@ -674,7 +678,7 @@ static HB_BOOL amf3_decode_class_def( amfContext * context, PHB_ITEM pClass, int if( pMappedClassDef ) { - pKey = hb_itemPutC( NULL, "class_def" ); /* hb_itemNew( NULL ); */ + pKey = hb_itemPutC( NULL, "class_def" ); /* hb_itemNew( NULL ); */ if( ! hb_hashAdd( pClass, pKey, pMappedClassDef ) ) { @@ -1073,7 +1077,9 @@ static HB_BOOL amf3_deserialize_obj( amfContext * context, PHB_ITEM pItem, HB_BO } else if( obj_type == 1 ) { - /* result = HB_TRUE; */ + #if 0 + result = HB_TRUE; + #endif result = amf3_decode_externalizable( context, pItem /*, pMappedClassDef */ ); } else if( obj_type == 2 ) diff --git a/contrib/hbamf/amfstdio.c b/contrib/hbamf/amfstdio.c index 1c87a9fe2c..bfd233e4a2 100644 --- a/contrib/hbamf/amfstdio.c +++ b/contrib/hbamf/amfstdio.c @@ -72,7 +72,10 @@ HB_FUNC( AMFSTDIO_READ ) { char * pszStrIn = ( char * ) hb_xgrab( SINGLEBUF ); char * pszLenPrefix = ( char * ) hb_xgrab( 5 ); - char * pszBuf; /* = ( char * ) hb_xgrab( SINGLEBUF ); */ + #if 0 + char * pszBuf; = ( char * ) hb_xgrab( SINGLEBUF ); + #endif + char * pszBuf; char * pszTmp = pszLenPrefix; HB_USHORT nBytes; int nTotal = 0; diff --git a/contrib/hbbz2io/bz2io.c b/contrib/hbbz2io/bz2io.c index a0daf60ecc..09966b4139 100644 --- a/contrib/hbbz2io/bz2io.c +++ b/contrib/hbbz2io/bz2io.c @@ -586,7 +586,9 @@ static void s_fileFlush( PHB_FILE pFile, HB_BOOL fDirty ) { if( pFile->iMode != FO_READ && pFile->fInited ) { - /* s_bz2_flush( pFile, HB_FALSE ); */ + #if 0 + s_bz2_flush( pFile, HB_FALSE ); + #endif _PHB_FILE->pFuncs->Flush( _PHB_FILE, fDirty ); } else diff --git a/contrib/hbgzio/gzio.c b/contrib/hbgzio/gzio.c index 23f68538ed..38f6504367 100644 --- a/contrib/hbgzio/gzio.c +++ b/contrib/hbgzio/gzio.c @@ -574,7 +574,9 @@ static void s_fileFlush( PHB_FILE pFile, HB_BOOL fDirty ) { if( pFile->iMode != FO_READ && pFile->fInited ) { - /* s_gzip_flush( pFile, HB_FALSE ); */ + #if 0 + s_gzip_flush( pFile, HB_FALSE ); + #endif _PHB_FILE->pFuncs->Flush( _PHB_FILE, fDirty ); } else diff --git a/contrib/hbhpdf/core.c b/contrib/hbhpdf/core.c index 518f407b8a..c9cb14be37 100644 --- a/contrib/hbhpdf/core.c +++ b/contrib/hbhpdf/core.c @@ -1398,7 +1398,7 @@ HB_FUNC( HPDF_VERSION_TEXT ) /* --- New Functions in LibHaru 2.2.0 --- */ -/* HPDF_EXPORT(HPDF_STATUS) HPDF_GetContents (HPDF_Doc pdf, HPDF_BYTE *buf, HPDF_UINT32 *size); */ +/* HPDF_GetContents( hDoc, @cBuffer ) --> nStatus */ HB_FUNC( HPDF_GETCONTENTS ) { #if HB_HPDF_VERS( 2, 2, 0 ) @@ -1420,7 +1420,7 @@ HB_FUNC( HPDF_GETCONTENTS ) #endif } -/* HPDF_EXPORT(HPDF_STATUS) HPDF_CheckError (HPDF_Error error); */ +/* HPDF_CheckError( pError ) --> nStatus */ HB_FUNC( HPDF_CHECKERROR ) { #if HB_HPDF_VERS( 2, 2, 0 ) @@ -1430,7 +1430,7 @@ HB_FUNC( HPDF_CHECKERROR ) #endif } -/* HPDF_EXPORT(HPDF_STATUS) HPDF_Page_SetZoom (HPDF_Page page, HPDF_REAL zoom); */ +/* HPDF_Page_SetZoom( hPage, nZoom ) --> nStatus */ HB_FUNC( HPDF_PAGE_SETZOOM ) { #if HB_HPDF_VERS( 2, 2, 0 ) @@ -1440,12 +1440,7 @@ HB_FUNC( HPDF_PAGE_SETZOOM ) #endif } -/* HPDF_EXPORT(HPDF_Dict) - HPDF_Page_Create3DView (HPDF_Page page, - HPDF_U3D u3d, - HPDF_Annotation annot3d, - const char *name); - */ +/* HPDF_Page_Create3DView( hPage, pU3d, pAnnot3d, cName ) --> pDict */ HB_FUNC( HPDF_PAGE_CREATE3DVIEW ) { #if HB_HPDF_VERS( 2, 2, 0 ) @@ -1455,7 +1450,7 @@ HB_FUNC( HPDF_PAGE_CREATE3DVIEW ) #endif } -/* HPDF_EXPORT(HPDF_EmbeddedFile) HPDF_AttachFile (HPDF_Doc pdf, const char *file); */ +/* HPDF_AttachFile( hDoc, cFile ) --> pEmbeddedFile */ HB_FUNC( HPDF_ATTACHFILE ) { #if HB_HPDF_VERS( 2, 2, 0 ) @@ -1465,13 +1460,7 @@ HB_FUNC( HPDF_ATTACHFILE ) #endif } -/* HPDF_EXPORT(HPDF_OutputIntent) - HPDF_ICC_LoadIccFromMem (HPDF_Doc pdf, - HPDF_MMgr mmgr, - HPDF_Stream iccdata, - HPDF_Xref xref, - int numcomponent); - */ +/* HPDF_ICC_LoadIccFromMem( hDoc, pMMgr, pICCDataStream, pXref, nNumComponent ) --> pOutputIntent */ HB_FUNC( HPDF_ICC_LOADICCFROMMEM ) { #if HB_HPDF_VERS( 2, 2, 0 ) @@ -1481,7 +1470,7 @@ HB_FUNC( HPDF_ICC_LOADICCFROMMEM ) #endif } -/* HPDF_EXPORT(HPDF_OutputIntent) HPDF_LoadIccProfileFromFile (HPDF_Doc pdf, const char* icc_file_name, int numcomponent); */ +/* HPDF_LoadIccProfileFromFile( hDoc, cICCFileName, nNumComponent ) --> pOutputIntent */ HB_FUNC( HPDF_LOADICCPROFILEFROMFILE ) { #if HB_HPDF_VERS( 2, 2, 0 ) @@ -1491,7 +1480,7 @@ HB_FUNC( HPDF_LOADICCPROFILEFROMFILE ) #endif } -/* HPDF_EXPORT(HPDF_STATUS) HPDF_UseUTFEncodings (HPDF_Doc pdf); */ +/* HPDF_UseUTFEncodings( hDoc ) --> nStatus */ HB_FUNC( HPDF_USEUTFENCODINGS ) { #if HB_HPDF_VERS( 2, 3, 0 ) diff --git a/contrib/hbmemio/memio.c b/contrib/hbmemio/memio.c index bd53ef9180..dfd93fcd4d 100644 --- a/contrib/hbmemio/memio.c +++ b/contrib/hbmemio/memio.c @@ -151,7 +151,9 @@ static void memfsExit( void * cargo ) static void memfsInit( void ) { - /* HB_CRITICAL_INIT( s_mtx ); */ + #if 0 + HB_CRITICAL_INIT( s_mtx ); + #endif s_error = 0; s_fs.ulInodeCount = 0; s_fs.ulInodeAlloc = HB_MEMFS_INITSIZE; diff --git a/contrib/hbmisc/irm.c b/contrib/hbmisc/irm.c index ff3b6f5d14..1e25f84361 100644 --- a/contrib/hbmisc/irm.c +++ b/contrib/hbmisc/irm.c @@ -257,7 +257,9 @@ PHB_IRMMAP hb_irmExecute( PHB_ITEM pItem ) hb_arraySet( dboi.itmNewVal, DBRMI_HIVAL, hb_arrayGetItemPtr( pItem, 5 ) ); } SELF_ORDINFO( pArea, DBOI_SCOPEEVAL, &dboi ); - /* bitcount ulSize = hb_itemGetNL( dboi.itmResult ); */ + #if 0 + bitcount ulSize = hb_itemGetNL( dboi.itmResult ); + #endif hb_itemRelease( dboi.itmNewVal ); hb_itemRelease( dboi.itmResult ); return pMap; diff --git a/contrib/hbmisc/spd.c b/contrib/hbmisc/spd.c index 20107e135f..488fcf31e5 100644 --- a/contrib/hbmisc/spd.c +++ b/contrib/hbmisc/spd.c @@ -69,7 +69,7 @@ static void STAItm( PHB_ITEM pItmPar ) cRes[ i++ ] = '\''; cRes[ i++ ] = *c++; } - cRes[ i++ ] = '\''; /* cRes[ i ] = '\0'; */ + cRes[ i++ ] = '\''; hb_itemPutCLPtr( pItmPar, cRes, i ); } diff --git a/contrib/hbnetio/netiosrv.c b/contrib/hbnetio/netiosrv.c index fd463b9675..e80bfc1615 100644 --- a/contrib/hbnetio/netiosrv.c +++ b/contrib/hbnetio/netiosrv.c @@ -1608,7 +1608,9 @@ HB_FUNC( NETIO_SERVER ) if( fNoAnswer ) { - /* continue; */ /* do not send dummy record */ + #if 0 + continue; /* do not send dummy record */ + #endif HB_PUT_LE_UINT32( &msg[ 0 ], NETIO_SYNC ); memset( msg + 4, '\0', NETIO_MSGLEN - 4 ); len = NETIO_MSGLEN; diff --git a/contrib/hbssl/ssl_sock.c b/contrib/hbssl/ssl_sock.c index 343f52042e..0111026d5f 100644 --- a/contrib/hbssl/ssl_sock.c +++ b/contrib/hbssl/ssl_sock.c @@ -100,7 +100,9 @@ long hb_ssl_socketRead( PHB_SSLSTREAM pStream, HB_SOCKET sd, int iToRead = -1; HB_MAXUINT timer; - /* sd = SSL_get_rfd( pStream->ssl ); */ + #if 0 + sd = SSL_get_rfd( pStream->ssl ); + #endif #if LONG_MAX > INT_MAX if( len > INT_MAX ) @@ -187,7 +189,9 @@ long hb_ssl_socketWrite( PHB_SSLSTREAM pStream, HB_SOCKET sd, long lWritten = 0, lWr = 0; HB_MAXUINT timer; - /* sd = SSL_get_wfd( pStream->ssl ); */ + #if 0 + sd = SSL_get_wfd( pStream->ssl ); + #endif #if LONG_MAX > INT_MAX if( len > INT_MAX ) diff --git a/contrib/hbwin/olecore.c b/contrib/hbwin/olecore.c index 4d55ef4ebe..d6ae77a082 100644 --- a/contrib/hbwin/olecore.c +++ b/contrib/hbwin/olecore.c @@ -1406,7 +1406,9 @@ void hb_oleVariantToItemEx( PHB_ITEM pItem, VARIANT * pVariant, HB_USHORT uiClas *V_CYREF( pVariant ), &dblVal ) != S_OK ) dblVal = 0; hb_itemPutND( pItem, dblVal ); - /* hb_itemPutNDLen( pItem, dblVal, 0, 4 ); */ + #if 0 + hb_itemPutNDLen( pItem, dblVal, 0, 4 ); + #endif break; } diff --git a/contrib/hbwin/wapi_commctrl.c b/contrib/hbwin/wapi_commctrl.c index 41f70ee135..7f2194ad7f 100644 --- a/contrib/hbwin/wapi_commctrl.c +++ b/contrib/hbwin/wapi_commctrl.c @@ -604,7 +604,9 @@ HB_FUNC( WAPI_TABCTRL_SETCURFOCUS ) /* (int)SNDMSG((hwnd), TCM_SETMINTABWIDTH, 0, x) */ HB_FUNC( WAPI_TABCTRL_SETMINTABWIDTH ) { - /* hbwapi_ret_NI( TabCtrl_SetMinTabWidth( hbwapi_par_raw_HWND( 1 ), hbwapi_par_INT( 2 ) ) ); */ + #if 0 + hbwapi_ret_NI( TabCtrl_SetMinTabWidth( hbwapi_par_raw_HWND( 1 ), hbwapi_par_INT( 2 ) ) ); + #endif hbwapi_ret_NI( ( int ) SendMessage( hbwapi_par_raw_HWND( 1 ), TCM_SETMINTABWIDTH, ( WPARAM ) 0, ( LPARAM ) hbwapi_par_INT( 2 ) ) ); } @@ -612,7 +614,9 @@ HB_FUNC( WAPI_TABCTRL_SETMINTABWIDTH ) /* (void)SNDMSG((hwnd), TCM_DESELECTALL, fExcludeFocus, 0) */ HB_FUNC( WAPI_TABCTRL_DESELECTALL ) { - /* TabCtrl_DeselectAll( hbwapi_par_raw_HWND( 1 ), hbwapi_par_UINT( 2 ) ); */ + #if 0 + TabCtrl_DeselectAll( hbwapi_par_raw_HWND( 1 ), hbwapi_par_UINT( 2 ) ); + #endif SendMessage( hbwapi_par_raw_HWND( 1 ), TCM_DESELECTALL, ( WPARAM ) hbwapi_par_UINT( 2 ), ( LPARAM ) 0 ); } @@ -819,7 +823,9 @@ HB_FUNC( WAPI_TREEVIEW_GETINSERTMARKCOLOR ) /* BOOL TreeView_GetISearchString( HWND hwndTV, LPTSTR lpsz ); */ HB_FUNC( WAPI_TREEVIEW_GETISEARCHSTRING ) { - /* hbwapi_ret_( TreeView_GetISearchString( hbwapi_par_raw_HWND( 1 ), LPTSTR ) ); */ + #if 0 + hbwapi_ret_( TreeView_GetISearchString( hbwapi_par_raw_HWND( 1 ), LPTSTR ) ); + #endif } /* BOOL TreeView_GetItem( HWND hwndTV, LPTVITEM pitem ); diff --git a/contrib/hbwin/wapi_winuser.c b/contrib/hbwin/wapi_winuser.c index 7210dc8fe7..7114fd08b1 100644 --- a/contrib/hbwin/wapi_winuser.c +++ b/contrib/hbwin/wapi_winuser.c @@ -683,12 +683,12 @@ HB_FUNC( WAPI_APPENDMENU ) #if 0 HB_FUNC( WAPI_GETMENUITEMINFO ) { - /* GetMenuItemInfo(); */ + GetMenuItemInfo(); } HB_FUNC( WAPI_SETMENUITEMINFO ) { - /* SetMenuItemInfo(); */ + SetMenuItemInfo(); } #endif diff --git a/contrib/hbwin/win_bmpd.c b/contrib/hbwin/win_bmpd.c index 6bbb279d3f..c8cf56b1c3 100644 --- a/contrib/hbwin/win_bmpd.c +++ b/contrib/hbwin/win_bmpd.c @@ -128,7 +128,7 @@ static int hb_jpeg_get_param( const HB_BYTE * buffer, HB_SIZE nBufferSize, int * if( nPos >= nBufferSize ) return _JPEG_RET_OVERRUN; - bpc = *( buffer + nPos ); /* nPos += 1; */ + bpc = *( buffer + nPos ); break; } diff --git a/contrib/hbwin/win_misc.c b/contrib/hbwin/win_misc.c index 893eed7396..079734f3b6 100644 --- a/contrib/hbwin/win_misc.c +++ b/contrib/hbwin/win_misc.c @@ -289,8 +289,6 @@ HB_FUNC( WIN_SYSREFRESH ) case WM_KEYUP: /* Perform any required cleanup. */ break; - /* exit; */ - #endif default: TranslateMessage( &msg ); diff --git a/contrib/hbzebra/qrcode.c b/contrib/hbzebra/qrcode.c index 24d9243935..c1180d9c4c 100644 --- a/contrib/hbzebra/qrcode.c +++ b/contrib/hbzebra/qrcode.c @@ -1160,7 +1160,9 @@ static int _qr_mask( PHB_BITBUFFER pBits, int iVersion ) } #ifdef DEBUG_CODE HB_TRACE( HB_TR_ALWAYS, ( "mask:%d", iMaskMin ) ); -/* iMaskMin = 0; */ + #if 0 + iMaskMin = 0; + #endif HB_TRACE( HB_TR_ALWAYS, ( "mask applied:%d", iMaskMin ) ); #endif _qr_mask_pattern( pBits, iVersion, iMaskMin ); diff --git a/contrib/rddads/ads1.c b/contrib/rddads/ads1.c index d6c48fc765..0c2f0368e0 100644 --- a/contrib/rddads/ads1.c +++ b/contrib/rddads/ads1.c @@ -210,7 +210,9 @@ static void DumpArea( ADSAREAP pArea ) /* For debugging: call this to dump ads UNSIGNED32 u32RetVal, ulRetAOF, ulRetFilt; UNSIGNED8 pucFormat[ 16 ]; UNSIGNED8 pucFilter[ 1025 ]; -/* UNSIGNED8 aucBuffer[ MAX_STR_LEN + 1 ]; */ + #if 0 + UNSIGNED8 aucBuffer[ MAX_STR_LEN + 1 ]; + #endif UNSIGNED8 pucIndexName[ MAX_STR_LEN + 1 ]; UNSIGNED8 pucIndexExpr[ MAX_STR_LEN + 1 ]; UNSIGNED8 pucIndexCond[ MAX_STR_LEN + 1 ]; @@ -1137,7 +1139,9 @@ static HB_ERRCODE adsSeek( ADSAREAP pArea, HB_BOOL bSoftSeek, PHB_ITEM pKey, HB_ if( pArea->area.fBof && ! pArea->area.fEof ) { HB_ERRCODE errCode = SELF_GOTO( &pArea->area, 0 ); - /* HB_ERRCODE errCode = SELF_GOTOP( &pArea->area ); */ + #if 0 + HB_ERRCODE errCode = SELF_GOTOP( &pArea->area ); + #endif pArea->area.fBof = HB_FALSE; #if defined( ADS_USE_OEM_TRANSLATION ) && ADS_LIB_VERSION < 600 if( pszKeyFree ) @@ -5093,7 +5097,9 @@ static HB_ERRCODE adsGetValueFile( ADSAREAP pArea, HB_USHORT uiIndex, const char ( UNSIGNED8 * ) HB_UNCONST( szFile ) ); if( u32RetVal != AE_SUCCESS ) { - /* commonError( pArea, EG_READ, ( HB_ERRCODE ) u32RetVal, 0, NULL, 0, NULL ); */ + #if 0 + commonError( pArea, EG_READ, ( HB_ERRCODE ) u32RetVal, 0, NULL, 0, NULL ); + #endif return HB_FAILURE; } return HB_SUCCESS; diff --git a/contrib/rddads/adsfunc.c b/contrib/rddads/adsfunc.c index 0fb81f8a37..b33a758538 100644 --- a/contrib/rddads/adsfunc.c +++ b/contrib/rddads/adsfunc.c @@ -327,7 +327,7 @@ HB_FUNC( ADSGETCONNECTIONTYPE ) pusConnectType = AE_INVALID_CONNECTION_HANDLE; /* It may have set an error value, or leave as 0. */ } else - pusConnectType = AE_NO_CONNECTION; /* AE_INVALID_CONNECTION_HANDLE; */ + pusConnectType = AE_NO_CONNECTION; /* AE_INVALID_CONNECTION_HANDLE */ hb_retni( pusConnectType ); } diff --git a/contrib/rddsql/sqlmix.c b/contrib/rddsql/sqlmix.c index 3ea8fe8caf..f6b3e302d0 100644 --- a/contrib/rddsql/sqlmix.c +++ b/contrib/rddsql/sqlmix.c @@ -952,7 +952,9 @@ static void hb_mixTagSkip( PMIXTAG pTag, HB_LONG lSkip ) pNode = pTag->CurNode; uiPos = pTag->CurPos; -/* printf("hb_mixTagSkip: CurNode=%p, CurPos=%d lSkip=%d\n", pNode, uiPos, lSkip ); */ + #if 0 + printf( "hb_mixTagSkip: CurNode=%p, CurPos=%d lSkip=%d\n", pNode, uiPos, lSkip ); + #endif if( lSkip > 0 ) { diff --git a/contrib/sddfb/core.c b/contrib/sddfb/core.c index efd3430e23..ab3782c7c9 100644 --- a/contrib/sddfb/core.c +++ b/contrib/sddfb/core.c @@ -170,7 +170,7 @@ static HB_ERRCODE fbConnect( SQLDDCONNECTION * pConnection, PHB_ITEM pItem ) if( isc_attach_database( status, ( short ) hb_arrayGetCLen( pItem, 5 ), hb_arrayGetCPtr( pItem, 5 ), &hDb, ( short ) i, parambuf ) ) - /* TODO: error code in status[ 1 ]; */ + /* TODO: error code in status[ 1 ] */ return HB_FAILURE; pConnection->pSDDConn = hb_xgrab( sizeof( SDDCONN ) ); ( ( SDDCONN * ) pConnection->pSDDConn )->hDb = hDb; diff --git a/contrib/xhb/cstructc.c b/contrib/xhb/cstructc.c index 284276e2fe..e5f3f7fd03 100644 --- a/contrib/xhb/cstructc.c +++ b/contrib/xhb/cstructc.c @@ -239,13 +239,17 @@ static HB_UINT SizeOfCStructure( PHB_ITEM aDef, HB_UINT uiAlign ) uiSize += uiMemberSize; - /* printf( "#%" HB_PFS "u Size: %u Align: %u Pad: %u Shift %i Size: %u\n", nIndex, uiMemberSize, uiAlign, uiPad, cShift, uiSize ); */ + #if 0 + printf( "#%" HB_PFS "u Size: %u Align: %u Pad: %u Shift %i Size: %u\n", nIndex, uiMemberSize, uiAlign, uiPad, cShift, uiSize ); + #endif } if( ( cShift = ( HB_BYTE ) ( uiSize % uiAlign ) ) > 0 ) uiSize += uiAlign - cShift; - /* printf( "#%" HB_PFS "u Size: %u Align: %u Pad: %u Shift %i Size: %u\n", nIndex, uiMemberSize, uiAlign, uiPad, cShift, uiSize ); */ + #if 0 + printf( "#%" HB_PFS "u Size: %u Align: %u Pad: %u Shift %i Size: %u\n", nIndex, uiMemberSize, uiAlign, uiPad, cShift, uiSize ); + #endif return uiSize; } @@ -282,13 +286,17 @@ static HB_BYTE * ArrayToStructure( PHB_ITEM aVar, PHB_ITEM aDef, HB_UINT uiAlign *puiSize = SizeOfCStructure( aDef, uiAlign ); - /* printf( "Size: %i\n", *puiSize ); */ + #if 0 + printf( "Size: %i\n", *puiSize ); + #endif Buffer = ( HB_BYTE * ) hb_xgrab( *puiSize + 1 ); for( nIndex = 0; nIndex < nLen; nIndex++ ) { - /* printf( "#: %i\n", nIndex ); */ + #if 0 + printf( "#: %i\n", nIndex ); + #endif switch( ( pBaseDef->pItems + nIndex )->item.asInteger.value ) { @@ -474,7 +482,9 @@ static HB_BYTE * ArrayToStructure( PHB_ITEM aVar, PHB_ITEM aDef, HB_UINT uiAlign uiOffset += uiPad - cShift; } - /* printf( "* Size: %i Offset: %i\n", uiMemberSize, uiOffset ); */ + #if 0 + printf( "* Size: %i Offset: %i\n", uiMemberSize, uiOffset ); + #endif switch( ( pBaseDef->pItems + nIndex )->item.asInteger.value ) { @@ -909,7 +919,9 @@ static HB_BYTE * ArrayToStructure( PHB_ITEM aVar, PHB_ITEM aDef, HB_UINT uiAlign hb_errRT_BASE( EG_ARG, 2023, NULL, "ArrayToStructure", 3, hb_paramError( 1 ), hb_paramError( 2 ), hb_paramError( 3 ) ); } - /* printf( "Wrote %i bytes at Offset %i\n", uiMemberSize, uiOffset ); */ + #if 0 + printf( "Wrote %i bytes at Offset %i\n", uiMemberSize, uiOffset ); + #endif uiOffset += uiMemberSize; } @@ -954,9 +966,13 @@ static PHB_ITEM StructureToArray( HB_BYTE * Buffer, HB_SIZE nBufferLen, PHB_ITEM #endif PHB_BASEARRAY pBaseVar; - /* TraceLog( NULL, "StructureToArray(%p, %p, %u, %i) ->%u\n", ( const void * ) Buffer, ( void * ) aDef, uiAlign, bAdoptNested, nLen ); */ + #if 0 + TraceLog( NULL, "StructureToArray(%p, %p, %u, %i) ->%u\n", ( const void * ) Buffer, ( void * ) aDef, uiAlign, bAdoptNested, nLen ); + #endif - /* hb_arrayNew( pRet, nLen ); */ + #if 0 + hb_arrayNew( pRet, nLen ); + #endif pBaseVar = pRet->item.asArray.value; uiOffset = 0; @@ -1063,11 +1079,15 @@ static PHB_ITEM StructureToArray( HB_BYTE * Buffer, HB_SIZE nBufferLen, PHB_ITEM if( ( cShift = ( HB_BYTE ) ( uiOffset % uiPad ) ) > 0 ) uiOffset += uiPad - cShift; - /* TraceLog( NULL, "* Size: %i Offset: %i Pad: %i\n", uiMemberSize, uiOffset, uiPad ); */ + #if 0 + TraceLog( NULL, "* Size: %i Offset: %i Pad: %i\n", uiMemberSize, uiOffset, uiPad ); + #endif } else { - /* TraceLog( NULL, "* Size: %i Offset: %i\n", uiMemberSize, uiOffset ); */ + #if 0 + TraceLog( NULL, "* Size: %i Offset: %i\n", uiMemberSize, uiOffset ); + #endif } if( ( uiOffset + uiMemberSize ) > nBufferLen ) @@ -1086,16 +1106,22 @@ static PHB_ITEM StructureToArray( HB_BYTE * Buffer, HB_SIZE nBufferLen, PHB_ITEM case CTYPE_CHAR_PTR: /* char * */ if( HB_IS_STRING( pBaseVar->pItems + nIndex ) && ( pBaseVar->pItems + nIndex )->item.asString.value == *( ( char ** ) ( Buffer + uiOffset ) ) ) { - /* TraceLog( NULL, "IDENTICAL: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); */ + #if 0 + TraceLog( NULL, "IDENTICAL: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); + #endif } else if( ! bAdoptNested ) { - /* TraceLog( NULL, "Static: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); */ + #if 0 + TraceLog( NULL, "Static: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); + #endif hb_itemPutCConst( pBaseVar->pItems + nIndex, *( ( char ** ) ( Buffer + uiOffset ) ) ); } else { - /* TraceLog( NULL, "Adopt: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); */ + #if 0 + TraceLog( NULL, "Adopt: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); + #endif hb_itemPutC( pBaseVar->pItems + nIndex, *( ( char ** ) ( Buffer + uiOffset ) ) ); } break; @@ -1103,16 +1129,22 @@ static PHB_ITEM StructureToArray( HB_BYTE * Buffer, HB_SIZE nBufferLen, PHB_ITEM case CTYPE_UNSIGNED_CHAR_PTR: /* unsigned char * */ if( HB_IS_STRING( pBaseVar->pItems + nIndex ) && ( pBaseVar->pItems + nIndex )->item.asString.value == *( ( char ** ) ( Buffer + uiOffset ) ) ) { - /* TraceLog( NULL, "IDENTICAL: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); */ + #if 0 + TraceLog( NULL, "IDENTICAL: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); + #endif } else if( ! bAdoptNested ) { - /* TraceLog( NULL, "Static: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); */ + #if 0 + TraceLog( NULL, "Static: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); + #endif hb_itemPutCConst( pBaseVar->pItems + nIndex, *( ( char ** ) ( Buffer + uiOffset ) ) ); } else { - /* TraceLog( NULL, "Adopt: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); */ + #if 0 + TraceLog( NULL, "Adopt: %s\n", *( ( char ** ) ( Buffer + uiOffset ) ) ); + #endif hb_itemPutC( pBaseVar->pItems + nIndex, *( ( char ** ) ( Buffer + uiOffset ) ) ); } break; @@ -1192,11 +1224,15 @@ static PHB_ITEM StructureToArray( HB_BYTE * Buffer, HB_SIZE nBufferLen, PHB_ITEM hb_objSendMsg( pStructure, "SizeOf", 0 ); uiNestedSize = ( HB_UINT ) hb_parns( -1 ); - /* TraceLog( NULL, "* NestedSize: %i Offset: %i\n", uiNestedSize, uiOffset ); */ + #if 0 + TraceLog( NULL, "* NestedSize: %i Offset: %i\n", uiNestedSize, uiOffset ); + #endif if( ( pBaseDef->pItems + nIndex )->item.asInteger.value > CTYPE_STRUCTURE_PTR ) { - /* printf( "Offset %i Pointer: %p\n", uiOffset, *( char ** ) ( (long ** )( Buffer + uiOffset ) ) ); */ + #if 0 + printf( "Offset %i Pointer: %p\n", uiOffset, *( char ** ) ( (long ** )( Buffer + uiOffset ) ) ); + #endif if( *( char ** ) ( ( long ** ) ( Buffer + uiOffset ) ) ) { @@ -1227,13 +1263,17 @@ static PHB_ITEM StructureToArray( HB_BYTE * Buffer, HB_SIZE nBufferLen, PHB_ITEM Adopt.type = HB_IT_LOGICAL; Adopt.item.asLogical.value = bAdoptNested; - /* TraceLog( NULL, "Before Devalue\n" ); */ + #if 0 + TraceLog( NULL, "Before Devalue\n" ); + #endif hb_itemPutCRawStatic( pInternalBuffer, ( char * ) ( HB_BYTE * ) ( Buffer + uiOffset ), uiNestedSize ); hb_objSendMsg( pStructure, "DEVALUE", 1, &Adopt ); - /* TraceLog( NULL, "After Devalue\n" ); */ + #if 0 + TraceLog( NULL, "After Devalue\n" ); + #endif } hb_itemMove( pBaseVar->pItems + nIndex, pStructure ); @@ -1244,7 +1284,9 @@ static PHB_ITEM StructureToArray( HB_BYTE * Buffer, HB_SIZE nBufferLen, PHB_ITEM uiOffset += uiMemberSize; - /* TraceLog( NULL, "AFTER Size: %i Offset: %i\n", uiMemberSize, uiOffset ); */ + #if 0 + TraceLog( NULL, "AFTER Size: %i Offset: %i\n", uiMemberSize, uiOffset ); + #endif } return pRet; diff --git a/contrib/xhb/hboutdbg.c b/contrib/xhb/hboutdbg.c index 3670555ccf..b78f2b334b 100644 --- a/contrib/xhb/hboutdbg.c +++ b/contrib/xhb/hboutdbg.c @@ -185,7 +185,9 @@ void hb_OutDebug( const char * szMsg, HB_SIZE nMsgLen ) if( iPid == s_iXtermPid || iPid == -1 ) { s_iXtermPid = 0; - /* close( s_iDebugFd ); */ + #if 0 + close( s_iDebugFd ); + #endif s_iDebugFd = 0; return; } diff --git a/contrib/xhb/hbserv.c b/contrib/xhb/hbserv.c index bd33684f41..dcf7859046 100644 --- a/contrib/xhb/hbserv.c +++ b/contrib/xhb/hbserv.c @@ -115,8 +115,10 @@ static int s_translateSignal( HB_UINT sig, HB_UINT subsig ); #if defined( HB_OS_UNIX ) || defined( HB_OS_OS2_GCC ) -/* TODO: Register the old signal action to allow graceful fallback - static struct sigaction s_aOldAction[ SIGUSR2 + 1 ]; */ +/* TODO: Register the old signal action to allow graceful fallback */ +#if 0 +static struct sigaction s_aOldAction[ SIGUSR2 + 1 ]; +#endif /* Implementation of the signal translation table */ static S_TUPLE s_sigTable[] = diff --git a/include/hbdefs.h b/include/hbdefs.h index e751d38398..7808eda21e 100644 --- a/include/hbdefs.h +++ b/include/hbdefs.h @@ -566,7 +566,9 @@ typedef HB_MAXUINT HB_VMMAXUINT; /* #define PCODE_LONG_LIM(l) HB_LIM_LONG( l ) */ /* type of HB_ITEM */ -/* typedef USHORT HB_TYPE; */ +#if 0 +typedef USHORT HB_TYPE; +#endif typedef HB_U32 HB_TYPE; /* type of file attributes */ diff --git a/include/hbexprb.c b/include/hbexprb.c index 24bbde6656..ecef9a9b0f 100644 --- a/include/hbexprb.c +++ b/include/hbexprb.c @@ -546,7 +546,9 @@ static HB_EXPR_FUNC( hb_compExprUseSelf ) /* Clipper allows such operation and because some valid Clipper * code needs it then I disabled error message, [druzus] */ - /* HB_COMP_ERROR_TYPE( pSelf ); */ + #if 0 + HB_COMP_ERROR_TYPE( pSelf ); + #endif break; case HB_EA_ARRAY_INDEX: hb_compErrorIndex( HB_COMP_PARAM, pSelf ); /* SELF cannot be used as array index element */ diff --git a/include/hbrddcdx.h b/include/hbrddcdx.h index 393789aae0..07be26e62b 100644 --- a/include/hbrddcdx.h +++ b/include/hbrddcdx.h @@ -351,7 +351,9 @@ typedef struct _CDXTAG struct _CDXINDEX * pIndex; /* a parent index info */ struct _CDXTAG * pNext; /* pointer to next tag in index */ - /* CDXSTACK PageStack[ CDX_STACKSIZE ]; */ /* stack with page path to current key */ + #if 0 + CDXSTACK PageStack[ CDX_STACKSIZE ]; /* stack with page path to current key */ + #endif LPCDXPAGE RootPage; /* pointer to root of keys tree in memory */ LPCDXKEY CurKey; /* current value of key expression */ LPCDXKEY HotKey; /* value of hot key expression */ diff --git a/include/hbthread.h b/include/hbthread.h index 3b1e24f2ee..6869786291 100644 --- a/include/hbthread.h +++ b/include/hbthread.h @@ -218,7 +218,9 @@ HB_EXTERN_BEGIN * anyhow I'd prefer to not make such strict binding to OS values because * it may cause troubles when code will be ported to other platforms. */ - /* typedef TID HB_THREAD_NO; */ + #if 0 + typedef TID HB_THREAD_NO; + #endif typedef HB_MAXINT HB_THREAD_NO; typedef TID HB_THREAD_ID; typedef TID HB_THREAD_HANDLE; diff --git a/include/hbwmain.c b/include/hbwmain.c index b054a87494..c6e630128e 100644 --- a/include/hbwmain.c +++ b/include/hbwmain.c @@ -63,7 +63,9 @@ int WINAPI WinMain( HINSTANCE hInstance, /* handle to current instance */ HB_SYMBOL_UNUSED( lpCmdLine ); - /* HB_TRACE( HB_TR_DEBUG, ("WinMain(%p, %p, %s, %d)", hInstance, hPrevInstance, lpCmdLine, iCmdShow ) ); */ + #if 0 + HB_TRACE( HB_TR_DEBUG, ("WinMain(%p, %p, %s, %d)", hInstance, hPrevInstance, lpCmdLine, iCmdShow ) ); + #endif hb_winmainArgInit( hInstance, hPrevInstance, iCmdShow ); diff --git a/src/common/hbffind.c b/src/common/hbffind.c index f5f31d205d..a6903daaba 100644 --- a/src/common/hbffind.c +++ b/src/common/hbffind.c @@ -439,7 +439,9 @@ static HB_BOOL hb_fsFindNextLow( PHB_FFIND ffind ) { ffind->bFirst = HB_FALSE; - /* tzset(); */ + #if 0 + tzset(); + #endif #if defined( __WATCOMC__ ) bFound = ( _dos_findfirst( ffind->pszFileMask, ( HB_USHORT ) hb_fsAttrToRaw( ffind->attrmask ), &info->entry ) == 0 ); @@ -756,7 +758,9 @@ static HB_BOOL hb_fsFindNextLow( PHB_FFIND ffind ) if( info->pattern[ 0 ] == '.' ) ffind->attrmask |= HB_FA_HIDDEN; - /* tzset(); */ + #if 0 + tzset(); + #endif info->dir = opendir( dirname ); hb_strncpy( info->path, dirname, sizeof( info->path ) - 1 ); @@ -854,7 +858,9 @@ static HB_BOOL hb_fsFindNextLow( PHB_FFIND ffind ) { int iTODO; /* TODO: for given platform */ - /* HB_SYMBOL_UNUSED( ffind ); */ + #if 0 + HB_SYMBOL_UNUSED( ffind ); + #endif HB_SYMBOL_UNUSED( iYear ); HB_SYMBOL_UNUSED( iMonth ); diff --git a/src/compiler/complex.c b/src/compiler/complex.c index 4499245852..7fffbdc6a3 100644 --- a/src/compiler/complex.c +++ b/src/compiler/complex.c @@ -1077,7 +1077,9 @@ int hb_comp_yylex( YYSTYPE * yylval_ptr, HB_COMP_DECL ) /* DO identifier [WITH ] */ pToken = hb_pp_tokenGet( pLex->pPP ); /* do not upper next token for case sensitive file systems */ - /* hb_pp_tokenUpper( pToken ); */ + #if 0 + hb_pp_tokenUpper( pToken ); + #endif pLex->lasttok = yylval_ptr->string = hb_comp_tokenIdentifer( HB_COMP_PARAM, pToken ); pLex->iState = IDENTIFIER; diff --git a/src/compiler/hbmain.c b/src/compiler/hbmain.c index dd183ef22a..419c8dae0e 100644 --- a/src/compiler/hbmain.c +++ b/src/compiler/hbmain.c @@ -456,7 +456,9 @@ void hb_compVariableAdd( HB_COMP_DECL, const char * szVarName, PHB_VARTYPE pVarT if( HB_TOUPPER( pVarType->cVarType ) == 'S' ) { - /* printf( "\nVariable %s is of Class: %s\n", szVarName, pVarType->szFromClass ); */ + #if 0 + printf( "\nVariable %s is of Class: %s\n", szVarName, pVarType->szFromClass ); + #endif pVar->pClass = hb_compClassFind( HB_COMP_PARAM, pVarType->szFromClass ); if( ! pVar->pClass ) { @@ -1065,7 +1067,9 @@ PHB_HCLASS hb_compClassAdd( HB_COMP_DECL, const char * szClassName, const char * PHB_HCLASS pClass; PHB_HDECLARED pDeclared; - /*printf( "Declaring Class: %s\n", szClassName );*/ + #if 0 + printf( "Declaring Class: %s\n", szClassName ); + #endif if( HB_COMP_PARAM->iWarnings < 3 ) return NULL; @@ -1118,7 +1122,9 @@ PHB_HDECLARED hb_compMethodAdd( HB_COMP_DECL, PHB_HCLASS pClass, const char * sz { PHB_HDECLARED pMethod; - /*printf( "\nDeclaring Method: %s of Class: %s Pointer: %li\n", szMethodName, pClass->szName, pClass );*/ + #if 0 + printf( "\nDeclaring Method: %s of Class: %s Pointer: %li\n", szMethodName, pClass->szName, pClass ); + #endif if( HB_COMP_PARAM->iWarnings < 3 ) return NULL; @@ -1184,7 +1190,9 @@ PHB_HDECLARED hb_compDeclaredAdd( HB_COMP_DECL, const char * szDeclaredName ) if( HB_COMP_PARAM->iWarnings < 3 ) return NULL; - /*printf( "\nDeclaring Function: %s\n", szDeclaredName, NULL );*/ + #if 0 + printf( "\nDeclaring Function: %s\n", szDeclaredName, NULL ); + #endif if( ( pDeclared = hb_compDeclaredFind( HB_COMP_PARAM, szDeclaredName ) ) != NULL ) { @@ -1262,7 +1270,9 @@ void hb_compDeclaredParameterAdd( HB_COMP_DECL, const char * szVarName, PHB_VART } else /* Declared Method Parameter */ { - /* printf( "\nAdding parameter: %s Type: %c In Method: %s Class: %s FROM CLASS: %s\n", szVarName, pVarType->cVarType, HB_COMP_PARAM->pLastMethod->szName, HB_COMP_PARAM->pLastClass->szName, pVarType->szFromClass ); */ + #if 0 + printf( "\nAdding parameter: %s Type: %c In Method: %s Class: %s FROM CLASS: %s\n", szVarName, pVarType->cVarType, HB_COMP_PARAM->pLastMethod->szName, HB_COMP_PARAM->pLastClass->szName, pVarType->szFromClass ); + #endif HB_COMP_PARAM->pLastMethod->iParamCount++; @@ -1283,7 +1293,9 @@ void hb_compDeclaredParameterAdd( HB_COMP_DECL, const char * szVarName, PHB_VART { HB_COMP_PARAM->pLastMethod->pParamClasses[ HB_COMP_PARAM->pLastMethod->iParamCount - 1 ] = hb_compClassFind( HB_COMP_PARAM, pVarType->szFromClass ); - /* printf( "\nParameter: %s FROM CLASS: %s\n", szVarName, HB_COMP_PARAM->pLastMethod->pParamClasses[ HB_COMP_PARAM->pLastMethod->iParamCount - 1 ]->szName ); */ + #if 0 + printf( "\nParameter: %s FROM CLASS: %s\n", szVarName, HB_COMP_PARAM->pLastMethod->pParamClasses[ HB_COMP_PARAM->pLastMethod->iParamCount - 1 ]->szName ); + #endif } } } @@ -1689,12 +1701,16 @@ static void hb_compOptimizeFrames( HB_COMP_DECL, PHB_HFUNC pFunc ) } else /* Check Global Statics. */ { - /* PHB_HVAR pVar = pFunc->pStatics; */ + #if 0 + PHB_HVAR pVar = pFunc->pStatics; + #endif PHB_HVAR pVar = HB_COMP_PARAM->functions.pFirst->pStatics; while( pVar ) { - /*printf( "\nChecking: %s Used: %i\n", pVar->szName, pVar->iUsed );*/ + #if 0 + printf( "\nChecking: %s Used: %i\n", pVar->szName, pVar->iUsed ); + #endif if( ! ( pVar->iUsed & HB_VU_USED ) && ( pVar->iUsed & HB_VU_INITIALIZED ) ) hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_VAL_NOT_USED, pVar->szName, NULL ); @@ -3389,7 +3405,9 @@ void hb_compStaticDefStart( HB_COMP_DECL ) { /* uncomment this if you want to always set main module name not the one where first static variable was declared */ - /* HB_COMP_PARAM->currModule = HB_COMP_PARAM->szFile; */ + #if 0 + HB_COMP_PARAM->currModule = HB_COMP_PARAM->szFile; + #endif hb_compGenModuleName( HB_COMP_PARAM, HB_COMP_PARAM->pInitFunc->szName ); } } diff --git a/src/compiler/hbopt.c b/src/compiler/hbopt.c index ea379073c6..7428f0a411 100644 --- a/src/compiler/hbopt.c +++ b/src/compiler/hbopt.c @@ -1684,7 +1684,9 @@ void hb_compPCodeTraceOptimizer( HB_COMP_DECL ) if( pLocals[ usIndex ].bFlags == ( OPT_LOCAL_FLAG_PUSH | OPT_LOCAL_FLAG_POPSELF ) || pLocals[ usIndex ].bFlags == OPT_LOCAL_FLAG_POPSELF ) { - /* printf( "Info: %s(%d) selfifying variable '%s'\n", pFunc->szName, pVar->iDeclLine, pVar->szName ); */ + #if 0 + printf( "Info: %s(%d) selfifying variable '%s'\n", pFunc->szName, pVar->iDeclLine, pVar->szName ); + #endif hb_compPCodeEnumSelfifyLocal( pFunc, usIndex + 1 ); pLocals[ usIndex ].bFlags = 0; } @@ -1726,7 +1728,9 @@ void hb_compPCodeTraceOptimizer( HB_COMP_DECL ) } else { - /* printf( "Info: %s(%d) removing unused variable '%s'\n", pFunc->szName, pVar->iDeclLine, pVar->szName ); */ + #if 0 + printf( "Info: %s(%d) removing unused variable '%s'\n", pFunc->szName, pVar->iDeclLine, pVar->szName ); + #endif /* Delete pVar from the linked list */ *ppVar = pVar->pNext; diff --git a/src/debug/dbgentry.c b/src/debug/dbgentry.c index 9d4042019e..73219f15c4 100644 --- a/src/debug/dbgentry.c +++ b/src/debug/dbgentry.c @@ -1617,7 +1617,9 @@ HB_BOOL hb_dbgIsValidStopLine( void * handle, const char * szModule, int nLine ) const char * hb_dbgGetModuleName( void * handle, const char * szName ) { - /* HB_DEBUGINFO * info = ( HB_DEBUGINFO * ) handle; */ + #if 0 + HB_DEBUGINFO * info = ( HB_DEBUGINFO * ) handle; + #endif HB_SYMBOL_UNUSED( handle ); if( szName ) diff --git a/src/rdd/dbf1.c b/src/rdd/dbf1.c index d45d4e78b6..c5ef4e9c2d 100644 --- a/src/rdd/dbf1.c +++ b/src/rdd/dbf1.c @@ -612,7 +612,9 @@ static HB_BOOL hb_dbfTriggerDo( DBFAREAP pArea, int iEvent, } else { - /* SIx3 makes: hb_vmPushInteger( 0 ); */ + #if 0 + hb_vmPushInteger( 0 ); /* SIx3 makes this */ + #endif hb_vmProc( 3 ); } fResult = hb_parl( -1 ); @@ -3433,7 +3435,9 @@ static HB_ERRCODE hb_dbfCreate( DBFAREAP pArea, LPDBOPENINFO pCreateInfo ) pField->uiLen = 8; pThisField->bLen = ( HB_BYTE ) pField->uiLen; pThisField->bFieldFlags |= HB_FF_BINARY; - /* HB_PUT_LE_UINT64( pThisField->bReserved2, 0 ); */ + #if 0 + HB_PUT_LE_UINT64( pThisField->bReserved2, 0 ); + #endif pArea->uiRecordLen += pField->uiLen; pArea->fModStamp = HB_TRUE; break; @@ -4431,7 +4435,9 @@ static HB_ERRCODE hb_dbfOpen( DBFAREAP pArea, LPDBOPENINFO pOpenInfo ) { pField = ( LPDBFFIELD ) ( pBuffer + uiCount * sizeof( DBFFIELD ) ); pField->bName[ 10 ] = '\0'; - /* hb_strupp( ( char * ) pField->bName ); */ + #if 0 + hb_strupp( ( char * ) pField->bName ); + #endif dbFieldInfo.atomName = ( const char * ) pField->bName; dbFieldInfo.uiLen = pField->bLen; dbFieldInfo.uiDec = 0; @@ -4557,7 +4563,9 @@ static HB_ERRCODE hb_dbfOpen( DBFAREAP pArea, LPDBOPENINFO pOpenInfo ) if( pArea->bTableType == DB_DBF_VFP ) { dbFieldInfo.uiType = HB_FT_VARLENGTH; - /* dbFieldInfo.uiFlags &= ~HB_FF_BINARY; */ + #if 0 + dbFieldInfo.uiFlags &= ~HB_FF_BINARY; + #endif hb_dbfAllocNullFlag( pArea, uiCount, HB_TRUE ); } else @@ -5718,7 +5726,9 @@ static HB_ERRCODE hb_dbfForceRel( DBFAREAP pArea ) /* update buffers */ /* commented out - see comment above in CHILDSYNC() method, Druzus */ - /* SELF_GOCOLD( &pArea->area ); */ + #if 0 + SELF_GOCOLD( &pArea->area ); + #endif return SELF_RELEVAL( &pArea->area, lpdbPendingRel ); } diff --git a/src/rdd/dbfcdx/dbfcdx1.c b/src/rdd/dbfcdx/dbfcdx1.c index 62ee1375e5..e9c06f0ecd 100644 --- a/src/rdd/dbfcdx/dbfcdx1.c +++ b/src/rdd/dbfcdx/dbfcdx1.c @@ -1173,8 +1173,9 @@ static void hb_cdxIndexCheckVersion( LPCDXINDEX pIndex ) pIndex->freePage = ulFree; hb_cdxIndexDiscardBuffers( pIndex ); } - /* TODO: !!! ## remove it it's for test only */ - /* hb_cdxIndexDiscardBuffers( pIndex ); */ + #if 0 + hb_cdxIndexDiscardBuffers( pIndex ); /* TODO: !!! ## remove it it's for test only */ + #endif } /* @@ -9820,7 +9821,9 @@ static void hb_cdxTagDoIndex( LPCDXTAG pTag, HB_BOOL fReindex ) #if ! defined( HB_SIXCDX ) if( pEvalItem && lStep ) { - /* pArea->dbfarea.area.fEof = HB_TRUE; */ + #if 0 + pArea->dbfarea.area.fEof = HB_TRUE; + #endif hb_cdxEvalCond( pArea, pEvalItem, HB_FALSE ); } #endif diff --git a/src/rdd/dbffpt/dbffpt1.c b/src/rdd/dbffpt/dbffpt1.c index c1b4c3259c..3d8b4abcf0 100644 --- a/src/rdd/dbffpt/dbffpt1.c +++ b/src/rdd/dbffpt/dbffpt1.c @@ -2400,7 +2400,9 @@ static HB_ERRCODE hb_fptReadFlexItem( FPTAREAP pArea, HB_BYTE ** pbMemoBuf, HB_B errCode = EDBF_CORRUPT; break; default: - /* fprintf( stderr, "Unknown FLEX array item: 0x%x = %d\n", usType, usType ); fflush( stderr ); */ + #if 0 + fprintf( stderr, "Unknown FLEX array item: 0x%x = %d\n", usType, usType ); fflush( stderr ); + #endif errCode = EDBF_CORRUPT; hb_itemClear( pItem ); break; diff --git a/src/rdd/dbfnsx/dbfnsx1.c b/src/rdd/dbfnsx/dbfnsx1.c index bf7ad7da55..9e84eb8f0c 100644 --- a/src/rdd/dbfnsx/dbfnsx1.c +++ b/src/rdd/dbfnsx/dbfnsx1.c @@ -2382,7 +2382,9 @@ static HB_BOOL hb_nsxTagGetPrevKey( LPTAGINFO pTag, HB_UCHAR * pKeyVal, int iLev return HB_TRUE; } } - /* memset( pKeyVal, pTag->TrailChar, pTag->KeyLength ); */ + #if 0 + memset( pKeyVal, pTag->TrailChar, pTag->KeyLength ); + #endif return HB_FALSE; } diff --git a/src/rdd/dbfntx/dbfntx1.c b/src/rdd/dbfntx/dbfntx1.c index c3c9a6ae26..d7b9faf35b 100644 --- a/src/rdd/dbfntx/dbfntx1.c +++ b/src/rdd/dbfntx/dbfntx1.c @@ -1941,7 +1941,9 @@ static HB_ERRCODE hb_ntxIndexHeaderRead( LPNTXINDEX pIndex ) #else LPCTXHEADER lpCTX = ( LPCTXHEADER ) pIndex->HeaderBuff; HB_ULONG ulVersion, ulNext; - /* HB_USHORT usTags = HB_GET_LE_UINT16( lpCTX->ntags ); */ + #if 0 + HB_USHORT usTags = HB_GET_LE_UINT16( lpCTX->ntags ); + #endif ulVersion = HB_GET_LE_UINT32( lpCTX->version ); ulNext = HB_GET_LE_UINT32( lpCTX->freepage ); @@ -5178,7 +5180,9 @@ static void hb_ntxSortOut( LPNTXSORTINFO pSort ) pSort->pSwapPage[ 0 ].ulCurKey = 0; pSort->pSwapPage[ 0 ].pKeyPool = pSort->pStartKey; } - /* printf("pSort->ulPages=%ld, pSort->ulPgKeys=%ld", pSort->ulPages, pSort->ulPgKeys);fflush(stdout); */ + #if 0 + printf( "pSort->ulPages=%ld, pSort->ulPgKeys=%ld", pSort->ulPages, pSort->ulPgKeys ); fflush( stdout ); + #endif hb_ntxSortOrderPages( pSort ); diff --git a/src/rdd/hbsix/sxcompr.c b/src/rdd/hbsix/sxcompr.c index dd5b396db4..93dfceadec 100644 --- a/src/rdd/hbsix/sxcompr.c +++ b/src/rdd/hbsix/sxcompr.c @@ -331,7 +331,9 @@ static HB_BOOL hb_LZSSxDecode( PHB_LZSSX_COMPR pCompr ) { if( ( h = hb_LZSSxRead( pCompr ) ) == -1 ) { - /* fResult = HB_FALSE; */ + #if 0 + fResult = HB_FALSE; + #endif break; } offset = LZSS_OFFSET( c, h ); /* get offset to ring buffer */ diff --git a/src/rdd/wacore.c b/src/rdd/wacore.c index 0cf64289ed..5e2a4179fe 100644 --- a/src/rdd/wacore.c +++ b/src/rdd/wacore.c @@ -578,7 +578,9 @@ HB_ERRCODE hb_rddDetachArea( AREAP pArea, PHB_ITEM pCargo ) SELF_GOCOLD( pArea ); /* tests shows that Xbase++ does not remove locks */ - /* SELF_UNLOCK( pArea, NULL ); */ + #if 0 + SELF_UNLOCK( pArea, NULL ); + #endif /* Xbase++ documentation says that child areas are also detached but * but tests shows that it's not true and either child or parent relations diff --git a/src/rdd/workarea.c b/src/rdd/workarea.c index cb6bc408a0..453f14c239 100644 --- a/src/rdd/workarea.c +++ b/src/rdd/workarea.c @@ -937,7 +937,9 @@ static HB_ERRCODE hb_waOrderInfo( AREAP pArea, HB_USHORT uiIndex, LPDBORDERINFO /* CA-Cl*pper does not generate RT error when default ORDERINFO() method * is called */ - /* hb_errRT_DBCMD( EG_ARG, EDBCMD_BADPARAMETER, NULL, HB_ERR_FUNCNAME ); */ + #if 0 + hb_errRT_DBCMD( EG_ARG, EDBCMD_BADPARAMETER, NULL, HB_ERR_FUNCNAME ); + #endif return HB_FAILURE; } @@ -1540,7 +1542,9 @@ static HB_ERRCODE hb_waRelEval( AREAP pArea, LPDBRELINFO pRelInfo ) * non numerical record IDs then this method should be overloaded * to use SELF_GOTOID(), [druzus] */ - /* errCode = SELF_GOTOID( pArea, pResult ); */ + #if 0 + errCode = SELF_GOTOID( pArea, pResult ); + #endif errCode = SELF_GOTO( pArea, hb_itemGetNL( pResult ) ); if( errCode == HB_SUCCESS ) { diff --git a/src/rtl/cputime.c b/src/rtl/cputime.c index 9989056dbf..fe16382140 100644 --- a/src/rtl/cputime.c +++ b/src/rtl/cputime.c @@ -119,7 +119,9 @@ double hb_secondsCPU( int n ) d += tm.tms_stime; /* In POSIX-1996 the CLK_TCK symbol is mentioned as obsolescent */ - /* d /= CLK_TCK; */ + #if 0 + d /= CLK_TCK; + #endif d /= ( double ) sysconf( _SC_CLK_TCK ); } #else diff --git a/src/rtl/dates.c b/src/rtl/dates.c index cc341dedb8..c95478fd56 100644 --- a/src/rtl/dates.c +++ b/src/rtl/dates.c @@ -94,7 +94,9 @@ char * hb_dateFormat( const char * szDate, char * szFormattedDate, const char * case 4: if( ! used_d && format_count < size ) { - /* szFormattedDate[ format_count++ ] = '0'; */ + #if 0 + szFormattedDate[ format_count++ ] = '0'; + #endif szFormattedDate[ format_count++ ] = szDate[ 6 ]; digit_count--; } @@ -102,7 +104,9 @@ char * hb_dateFormat( const char * szDate, char * szFormattedDate, const char * case 3: if( ! used_d && format_count < size ) { - /* szFormattedDate[ format_count++ ] = '0'; */ + #if 0 + szFormattedDate[ format_count++ ] = '0'; + #endif szFormattedDate[ format_count++ ] = szDate[ 6 ]; digit_count--; } @@ -132,7 +136,9 @@ char * hb_dateFormat( const char * szDate, char * szFormattedDate, const char * case 4: if( ! used_m && format_count < size ) { - /* szFormattedDate[ format_count++ ] = '0'; */ + #if 0 + szFormattedDate[ format_count++ ] = '0'; + #endif szFormattedDate[ format_count++ ] = szDate[ 4 ]; digit_count--; } @@ -140,7 +146,9 @@ char * hb_dateFormat( const char * szDate, char * szFormattedDate, const char * case 3: if( ! used_m && format_count < size ) { - /* szFormattedDate[ format_count++ ] = '0'; */ + #if 0 + szFormattedDate[ format_count++ ] = '0'; + #endif szFormattedDate[ format_count++ ] = szDate[ 4 ]; digit_count--; } diff --git a/src/rtl/gtchrmap.c b/src/rtl/gtchrmap.c index ea2a9b0391..a865b3c84b 100644 --- a/src/rtl/gtchrmap.c +++ b/src/rtl/gtchrmap.c @@ -325,7 +325,9 @@ static int chrmap_parse( FILE * fp, const char * pszTerm, int * nTransTbl, const } else if( n == 1 ) { - /* printf("line: %3d\tfrom=%d, to=%d, op='%c', val=%d, mod=%d\n", line, from, to, op, val, mod); */ + #if 0 + printf( "line: %3d\tfrom=%d, to=%d, op='%c', val=%d, mod=%d\n", line, from, to, op, val, mod ); + #endif for( i = from; i <= to; ++i ) { switch( op ) diff --git a/src/rtl/gtcrs/gtcrs.c b/src/rtl/gtcrs/gtcrs.c index fc548a0b86..46a5590a3b 100644 --- a/src/rtl/gtcrs/gtcrs.c +++ b/src/rtl/gtcrs/gtcrs.c @@ -628,7 +628,9 @@ static void set_tmevt( unsigned char * cMBuf, mouseEvent * mEvt ) break; } chk_mevtdblck( mEvt ); - /* printf( "\n\rmouse event: %02x, %02x, %02x\n\r", cMBuf[ 0 ], cMBuf[ 1 ], cMBuf[ 2 ] ); */ + #if 0 + printf( "\n\rmouse event: %02x, %02x, %02x\n\r", cMBuf[ 0 ], cMBuf[ 1 ], cMBuf[ 2 ] ); + #endif } #if defined( HB_HAS_GPM ) @@ -1212,10 +1214,13 @@ static void disp_cursor( InOutBase * ioBase ) write_ttyseq( ioBase, escseq ); } else if( cv != NULL ) + { /* curses cursor shape set */ - /* curs_set( ncurs ); */ + #if 0 + curs_set( ncurs ); + #endif write_ttyseq( ioBase, cv ); - + } } ioBase->lcursor = ioBase->cursor; @@ -1369,7 +1374,9 @@ static void init_keys( InOutBase * ioBase ) #endif /* some harcoded sequences */ - /* addKeyMap( ioBase, K_ESC, "\033\033" ); */ + #if 0 + addKeyMap( ioBase, K_ESC, "\033\033" ); + #endif addKeyMap( ioBase, EXKEY_ENTER, "\r" ); addKeyMap( ioBase, K_MOUSETERM, "\033[M" ); @@ -1610,7 +1617,9 @@ static void set_sig_keys( InOutBase * ioBase, int key_int, int key_brk, ioBase->curr_TIO.c_cc[ VSUSP ] != 0 ) ioBase->curr_TIO.c_lflag |= ISIG; - /* ioctl( ioBase->base_infd, TIOCSCTTY, 0 ); */ + #if 0 + ioctl( ioBase->base_infd, TIOCSCTTY, 0 ); + #endif gt_ttyset( ioBase ); } } @@ -1867,7 +1876,9 @@ static InOutBase * create_ioBase( char * term, int infd, int outfd, int errfd, ioBase->curr_TIO.c_cflag |= CS8 | CREAD; ioBase->curr_TIO.c_iflag &= ~( IGNBRK | BRKINT | PARMRK | ISTRIP | INLCR | IGNCR | ICRNL | IXON ); ioBase->curr_TIO.c_oflag &= ~OPOST; - /* ioBase->curr_TIO.c_oflag |= ONLCR | OPOST; */ + #if 0 + ioBase->curr_TIO.c_oflag |= ONLCR | OPOST; + #endif memset( ioBase->curr_TIO.c_cc, 0, NCCS ); @@ -2521,7 +2532,9 @@ static HB_BOOL hb_gt_crs_Resume( PHB_GT pGT ) s_ioBase->lcursor = SC_UNDEF; wrefresh( s_ioBase->hb_stdscr ); gt_ttyset( s_ioBase ); - /* redrawwin( s_ioBase->hb_stdscr ); */ + #if 0 + redrawwin( s_ioBase->hb_stdscr ); + #endif gt_refresh( s_ioBase ); } diff --git a/src/rtl/gtpca/gtpca.c b/src/rtl/gtpca/gtpca.c index aded68e583..671e8ecf2e 100644 --- a/src/rtl/gtpca/gtpca.c +++ b/src/rtl/gtpca/gtpca.c @@ -147,22 +147,30 @@ static void sig_handler( int iSigNo ) #endif #ifdef SIGWINCH case SIGWINCH: - /* s_WinSizeChangeFlag = HB_TRUE; */ + #if 0 + s_WinSizeChangeFlag = HB_TRUE; + #endif break; #endif #ifdef SIGINT case SIGINT: - /* s_InetrruptFlag = HB_TRUE; */ + #if 0 + s_InetrruptFlag = HB_TRUE; + #endif break; #endif #ifdef SIGQUIT case SIGQUIT: - /* s_BreakFlag = HB_TRUE; */ + #if 0 + s_BreakFlag = HB_TRUE; + #endif break; #endif #ifdef SIGTSTP case SIGTSTP: - /* s_DebugFlag = HB_TRUE; */ + #if 0 + s_DebugFlag = HB_TRUE; + #endif break; #endif #ifdef SIGTTOU @@ -495,7 +503,9 @@ static void hb_gt_pca_Init( PHB_GT pGT, HB_FHANDLE hFilenoStdin, HB_FHANDLE hFil tcgetattr( hFilenoStdin, &s_saved_TIO ); memcpy( &s_curr_TIO, &s_saved_TIO, sizeof( struct termios ) ); - /* atexit( restore_input_mode ); */ + #if 0 + atexit( restore_input_mode ); + #endif s_curr_TIO.c_lflag &= ~( ICANON | ECHO ); s_curr_TIO.c_iflag &= ~ICRNL; #if 0 diff --git a/src/rtl/gtsln/gtsln.c b/src/rtl/gtsln/gtsln.c index 52d27cc6f2..3bd00ac3fe 100644 --- a/src/rtl/gtsln/gtsln.c +++ b/src/rtl/gtsln/gtsln.c @@ -588,7 +588,9 @@ static void hb_gt_sln_Init( PHB_GT pGT, HB_FHANDLE hFilenoStdin, HB_FHANDLE hFil hb_sln_isUTF8( SLang_TT_Write_FD, SLang_TT_Read_FD ) ); #endif #ifdef HB_SLN_UNICODE - /* SLsmg_Setlocale = 0; */ + #if 0 + SLsmg_Setlocale = 0; + #endif #endif /* initialize a screen handling subsytem */ if( SLsmg_init_smg() != -1 ) diff --git a/src/rtl/gtsln/kbsln.c b/src/rtl/gtsln/kbsln.c index 541136e7ea..b2648fc002 100644 --- a/src/rtl/gtsln/kbsln.c +++ b/src/rtl/gtsln/kbsln.c @@ -198,7 +198,9 @@ static void hb_sln_Init_KeyTranslations( void ) { for( ch = AltChars[ i ][ 0 ]; ch <= AltChars[ i ][ 1 ]; ch++ ) { - /* fprintf( stderr, "%d %c\n", i, ch ); */ + #if 0 + fprintf( stderr, "%d %c\n", i, ch ); + #endif keyname[ 1 ] = ch; /* QUESTION: why Slang reports error for defining Alt+O ???. @@ -214,13 +216,17 @@ static void hb_sln_Init_KeyTranslations( void ) keyseq = SLtt_tgetstr( ( char * ) "Km" ); if( ( keyseq != NULL ) && ( keyseq[ 0 ] != 0 ) ) { - /* fprintf( stderr, "%s\r\n", keyseq ); */ + #if 0 + fprintf( stderr, "%s\r\n", keyseq ); + #endif SLkp_define_keysym( keyseq, SL_KEY_MOU ); } } /* five on numeric console */ - /* SLkp_define_keysym( "^[[G", SL_KEY_NUM_5 ); */ + #if 0 + SLkp_define_keysym( "^[[G", SL_KEY_NUM_5 ); + #endif } /* *********************************************************************** */ @@ -264,7 +270,9 @@ int hb_sln_Init_Terminal( int phase ) newTTY.c_cc[ VSTART ] = 255; /* disable ^Q start/stop processing */ newTTY.c_cc[ VSUSP ] = 255; /* disable ^Z suspend processing */ /* already done in Slang library */ - /* newTTY.c_cc[ VDSUSP ] = 255; */ /* disable ^Y delayed suspend processing */ + #if 0 + newTTY.c_cc[ VDSUSP ] = 255; /* disable ^Y delayed suspend processing */ + #endif /* workaround for bug in some Linux kernels (i.e. 3.13.0-64-generic Ubuntu) in which select() unconditionally accepts stdin for @@ -316,7 +324,9 @@ int hb_gt_sln_ReadKey( PHB_GT pGT, int iEventMask ) #endif /* TODO: we need here some kind of screen redrawing */ - /*SLsmg_refresh();*/ + #if 0 + SLsmg_refresh(); + #endif HB_GTSELF_RESIZE( pGT, SLtt_Screen_Rows, SLtt_Screen_Cols ); return HB_K_RESIZE; } diff --git a/src/rtl/gtsln/keytrans.c b/src/rtl/gtsln/keytrans.c index a4f3d9ffb5..8e3fc84bae 100644 --- a/src/rtl/gtsln/keytrans.c +++ b/src/rtl/gtsln/keytrans.c @@ -433,7 +433,9 @@ static int hb_sln_FindKeyTranslation( int SlangKey ) { int CurPos = ( Start + Stop ) / 2; - /* fprintf( stderr, "%d %d %d\n", i, KeyTranslationTable[ i ][ 0 ], KeyTranslationTable[ i ][ 1 ] ); */ + #if 0 + fprintf( stderr, "%d %d %d\n", i, KeyTranslationTable[ i ][ 0 ], KeyTranslationTable[ i ][ 1 ] ); + #endif if( SlangKey == KeyTranslationTable[ CurPos ][ 0 ] ) return KeyTranslationTable[ CurPos ][ 1 ]; @@ -446,7 +448,9 @@ static int hb_sln_FindKeyTranslation( int SlangKey ) } } - /* return SlangKey; */ + #if 0 + return SlangKey; + #endif return 0; } diff --git a/src/rtl/gtstd/gtstd.c b/src/rtl/gtstd/gtstd.c index f926fb7099..8ada07bb5c 100644 --- a/src/rtl/gtstd/gtstd.c +++ b/src/rtl/gtstd/gtstd.c @@ -145,22 +145,30 @@ static void sig_handler( int iSigNo ) #endif #ifdef SIGWINCH case SIGWINCH: - /* s_WinSizeChangeFlag = HB_TRUE; */ + #if 0 + s_WinSizeChangeFlag = HB_TRUE; + #endif break; #endif #ifdef SIGINT case SIGINT: - /* s_InetrruptFlag = HB_TRUE; */ + #if 0 + s_InetrruptFlag = HB_TRUE; + #endif break; #endif #ifdef SIGQUIT case SIGQUIT: - /* s_BreakFlag = HB_TRUE; */ + #if 0 + s_BreakFlag = HB_TRUE; + #endif break; #endif #ifdef SIGTSTP case SIGTSTP: - /* s_DebugFlag = HB_TRUE; */ + #if 0 + s_DebugFlag = HB_TRUE; + #endif break; #endif #ifdef SIGTSTP @@ -235,7 +243,9 @@ static void hb_gt_std_Init( PHB_GT pGT, HB_FHANDLE hFilenoStdin, HB_FHANDLE hFil tcgetattr( pGTSTD->hStdin, &pGTSTD->saved_TIO ); memcpy( &pGTSTD->curr_TIO, &pGTSTD->saved_TIO, sizeof( struct termios ) ); - /* atexit( restore_input_mode ); */ + #if 0 + atexit( restore_input_mode ); + #endif pGTSTD->curr_TIO.c_lflag &= ~( ICANON | ECHO ); pGTSTD->curr_TIO.c_iflag &= ~ICRNL; #if 0 diff --git a/src/rtl/gttrm/gttrm.c b/src/rtl/gttrm/gttrm.c index 1bdcf359ec..e058b45ec2 100644 --- a/src/rtl/gttrm/gttrm.c +++ b/src/rtl/gttrm/gttrm.c @@ -466,13 +466,19 @@ static void sig_handler( int iSigNo ) s_WinSizeChangeFlag = HB_TRUE; break; case SIGINT: - /* s_InetrruptFlag = HB_TRUE; */ + #if 0 + s_InetrruptFlag = HB_TRUE; + #endif break; case SIGQUIT: - /* s_BreakFlag = HB_TRUE; */ + #if 0 + s_BreakFlag = HB_TRUE; + #endif break; case SIGTSTP: - /* s_DebugFlag = HB_TRUE; */ + #if 0 + s_DebugFlag = HB_TRUE; + #endif break; case SIGTTOU: s_fRestTTY = HB_FALSE; @@ -909,7 +915,9 @@ static void set_tmevt( PHB_GTTRM pTerm, unsigned char * cMBuf, mouseEvent * mEvt break; } chk_mevtdblck( pTerm ); - /* printf( "\r\nmouse event: %02x, %02x, %02x\r\n", cMBuf[ 0 ], cMBuf[ 1 ], cMBuf[ 2 ] ); */ + #if 0 + printf( "\r\nmouse event: %02x, %02x, %02x\r\n", cMBuf[ 0 ], cMBuf[ 1 ], cMBuf[ 2 ] ); + #endif } #if defined( HB_HAS_GPM ) @@ -3362,7 +3370,9 @@ static void hb_gt_trm_Init( PHB_GT pGT, HB_FHANDLE hFilenoStdin, HB_FHANDLE hFil tcgetattr( pTerm->hFilenoStdin, &pTerm->saved_TIO ); memcpy( &pTerm->curr_TIO, &pTerm->saved_TIO, sizeof( struct termios ) ); - /* atexit( restore_input_mode ); */ + #if 0 + atexit( restore_input_mode ); + #endif pTerm->curr_TIO.c_lflag &= ~( ECHO | ECHONL | ICANON | ISIG | IEXTEN ); pTerm->curr_TIO.c_lflag |= NOFLSH; pTerm->curr_TIO.c_cflag &= ~( CSIZE | PARENB ); @@ -3377,8 +3387,10 @@ static void hb_gt_trm_Init( PHB_GT pGT, HB_FHANDLE hFilenoStdin, HB_FHANDLE hFil *buntu) in which select() unconditionally accepts stdin for reading if c_cc[ VMIN ] = 0 [druzus] */ pTerm->curr_TIO.c_cc[ VMIN ] = 1; - /* pTerm->curr_TIO.c_cc[ VMIN ] = 0; */ - /* pTerm->curr_TIO.c_cc[ VTIME ] = 0; */ + #if 0 + pTerm->curr_TIO.c_cc[ VMIN ] = 0; + pTerm->curr_TIO.c_cc[ VTIME ] = 0; + #endif tcsetattr( pTerm->hFilenoStdin, TCSAFLUSH, &pTerm->curr_TIO ); act.sa_handler = SIG_DFL; diff --git a/src/rtl/gtwvt/gtwvt.c b/src/rtl/gtwvt/gtwvt.c index 65a5bb7681..be1d3e4d52 100644 --- a/src/rtl/gtwvt/gtwvt.c +++ b/src/rtl/gtwvt/gtwvt.c @@ -149,13 +149,15 @@ static void hb_gt_wvt_RegisterClass( HINSTANCE hInstance ) memset( &wndclass, 0, sizeof( wndclass ) ); wndclass.style = CS_HREDRAW | CS_VREDRAW | CS_DBLCLKS; wndclass.lpfnWndProc = hb_gt_wvt_WndProc; -/* wndclass.cbClsExtra = 0; */ -/* wndclass.cbWndExtra = 0; */ wndclass.hInstance = hInstance; -/* wndclass.hIcon = NULL; */ wndclass.hCursor = LoadCursor( NULL, IDC_ARROW ); -/* wndclass.hbrBackground = NULL; */ -/* wndclass.lpszMenuName = NULL; */ +#if 0 + wndclass.cbClsExtra = 0; + wndclass.cbWndExtra = 0; + wndclass.hIcon = NULL; + wndclass.hbrBackground = NULL; + wndclass.lpszMenuName = NULL; +#endif wndclass.lpszClassName = s_szClassName; if( ! RegisterClass( &wndclass ) ) @@ -3141,7 +3143,9 @@ static void hb_gt_wvt_CreateWindow( PHB_GTWVT pWVT ) { DWORD dwStyle; - /* InitCommonControls(); */ + #if 0 + InitCommonControls(); + #endif dwStyle = pWVT->bResizable ? _WVT_WS_DEF : _WVT_WS_NORESIZE; @@ -3350,7 +3354,9 @@ static void hb_gt_wvt_Init( PHB_GT pGT, HB_FHANDLE hFilenoStdin, HB_FHANDLE hFil HB_GTSELF_SETFLAG( pGT, HB_GTI_REDRAWMAX, 1 ); HB_GTSELF_SEMICOLD( pGT ); - /* hb_gt_wvt_CreateConsoleWindow( pWVT ); */ + #if 0 + hb_gt_wvt_CreateConsoleWindow( pWVT ); + #endif } else hb_errInternal( 10001, "Maximum number of WVT windows reached, cannot create another one", NULL, NULL ); diff --git a/src/rtl/gtxwc/gtxwc.c b/src/rtl/gtxwc/gtxwc.c index a7fae0e4b7..1304ec1c1b 100644 --- a/src/rtl/gtxwc/gtxwc.c +++ b/src/rtl/gtxwc/gtxwc.c @@ -3165,7 +3165,9 @@ static void hb_gt_xwc_WndProc( PXWND_DEF wnd, XEvent * evt ) break; nI += hb_cdpTextPutU16( wnd->utf8CDP, pBuffer + nI, nSize - nI, usChar ); - /* nI += hb_cdpU16CharToUTF8( pBuffer + nI, &usChar ); */ + #if 0 + nI += hb_cdpU16CharToUTF8( pBuffer + nI, &usChar ); + #endif } if( wnd->markTop < wnd->markBottom ) pBuffer[ nI++ ] = '\n'; @@ -3798,7 +3800,9 @@ static void hb_gt_xwc_RepaintChar( PXWND_DEF wnd, int colStart, int rowStart, in break; case CH_CHBX: - /* hb_gt_xwc_DrawBoxChar( wnd, icol, irow, chTrans->u.ch16, color ); */ + #if 0 + hb_gt_xwc_DrawBoxChar( wnd, icol, irow, chTrans->u.ch16, color ); + #endif break; case CH_NONE: @@ -4368,7 +4372,9 @@ static HB_BOOL hb_gt_xwc_SetFont( PXWND_DEF wnd, const char * fontFace, /* a shortcut for window height and width */ wnd->fontHeight = xfs->max_bounds.ascent + xfs->max_bounds.descent; - /* wnd->fontWidth = xfs->max_bounds.rbearing - xfs->min_bounds.lbearing; */ + #if 0 + wnd->fontWidth = xfs->max_bounds.rbearing - xfs->min_bounds.lbearing; + #endif wnd->fontWidth = xfs->max_bounds.width; if( wnd->xfs ) @@ -4954,10 +4960,14 @@ static void hb_gt_xwc_Init( PHB_GT pGT, HB_FHANDLE hFilenoStdin, HB_FHANDLE hFil HB_GTSELF_SEMICOLD( pGT ); /* For immediate connection to XSarver and screen Window show */ - /* hb_gt_xwc_RealRefresh( wnd, HB_TRUE ); */ + #if 0 + hb_gt_xwc_RealRefresh( wnd, HB_TRUE ); + #endif /* For connection to XSarver only */ - /* hb_gt_xwc_ConnectX( wnd, HB_TRUE ); */ + #if 0 + hb_gt_xwc_ConnectX( wnd, HB_TRUE ); + #endif } /* *********************************************************************** */ @@ -5091,7 +5101,9 @@ static int hb_gt_xwc_ReadKey( PHB_GT pGT, int iEventMask ) wnd = HB_GTXWC_GET( pGT ); hb_gt_xwc_LateRefresh( wnd ); - /* hb_gt_xwc_RealRefresh( wnd, HB_FALSE ); */ + #if 0 + hb_gt_xwc_RealRefresh( wnd, HB_FALSE ); + #endif if( hb_gt_xwc_GetCharFromInputQueue( wnd, &c ) ) return c; @@ -5603,7 +5615,9 @@ static HB_BOOL hb_gt_xwc_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo ) /* this mode is not supported yet by GTXWC */ break; case HB_GTI_RESIZEMODE_ROWS: - /* wnd->iResizeMode = iVal; */ + #if 0 + wnd->iResizeMode = iVal; + #endif break; } } diff --git a/src/rtl/hbcom.c b/src/rtl/hbcom.c index 7ba3078e7f..95ddab3b01 100644 --- a/src/rtl/hbcom.c +++ b/src/rtl/hbcom.c @@ -143,7 +143,9 @@ typedef struct int oserr; int port; char * name; -/* struct termios tio; */ + #if 0 + struct termios tio; + #endif } HB_COM, * PHB_COM; @@ -2260,7 +2262,9 @@ int hb_comClose( int iPort ) if( pCom ) { hb_vmUnlock(); - /* FlushFileBuffers( pCom->hComm ); */ + #if 0 + FlushFileBuffers( pCom->hComm ); + #endif fResult = CloseHandle( pCom->hComm ); pCom->hComm = INVALID_HANDLE_VALUE; pCom->status &= ~HB_COM_OPEN; @@ -3091,7 +3095,9 @@ int hb_comClose( int iPort ) if( pCom ) { hb_vmUnlock(); - /* DosResetBuffer( pCom->hFile ); */ + #if 0 + DosResetBuffer( pCom->hFile ); + #endif rc = DosClose( pCom->hFile ); pCom->hFile = 0; pCom->status &= ~HB_COM_OPEN; diff --git a/src/rtl/hbproces.c b/src/rtl/hbproces.c index e421af4282..c758cc3d21 100644 --- a/src/rtl/hbproces.c +++ b/src/rtl/hbproces.c @@ -1078,7 +1078,9 @@ HB_BOOL hb_fsProcessClose( HB_FHANDLE hProcess, HB_BOOL fGentle ) fResult = TerminateProcess( hProc, fGentle ? 0 : 1 ) != 0; hb_fsSetIOError( fResult, 0 ); /* hProc has to be closed by hb_fsProcessValue() */ - /* CloseHandle( hProc ); */ + #if 0 + CloseHandle( hProc ); + #endif } else hb_fsSetError( ( HB_ERRCODE ) FS_ERROR ); diff --git a/src/rtl/itemseri.c b/src/rtl/itemseri.c index 17663e153c..e634e12ec9 100644 --- a/src/rtl/itemseri.c +++ b/src/rtl/itemseri.c @@ -1690,7 +1690,9 @@ static HB_SIZE hb_deserializeItem( PHB_ITEM pItem, nOffset = hb_deserializeItem( pItem, cdpIn, cdpOut, pBuffer, nOffset, pRefList ); /* we do not support xHarbour codeblock deserialization: HB_RestoreBlock( pItem ) */ - /* hb_itemSerialTypedSet( pRefList, pItem, HB_SERIAL_XHB_B ); */ + #if 0 + hb_itemSerialTypedSet( pRefList, pItem, HB_SERIAL_XHB_B ); + #endif hb_itemClear( pItem ); break; case HB_SERIAL_XHB_H: diff --git a/src/rtl/langapi.c b/src/rtl/langapi.c index c63c9a6105..3ff3dd74f9 100644 --- a/src/rtl/langapi.c +++ b/src/rtl/langapi.c @@ -196,7 +196,9 @@ static HB_LANG s_lang_en = HB_LANG_ANNOUNCE( EN ) /* Always link in the default language */ -/* HB_LANG_REQUEST( HB_LANG_DEFAULT ); */ +#if 0 +HB_LANG_REQUEST( HB_LANG_DEFAULT ); +#endif /* NOTE: This is the maximum number of registered languages, later this can be made dynamic. */ diff --git a/src/rtl/run.c b/src/rtl/run.c index 1384ef90c2..385b0b8631 100644 --- a/src/rtl/run.c +++ b/src/rtl/run.c @@ -82,7 +82,9 @@ HB_FUNC( __RUN ) if( hb_gtResume() != HB_SUCCESS ) { /* an error should be generated here !! Something like */ - /* hb_errRT_BASE_Ext1( EG_GTRESUME, 6002, NULL, HB_ERR_FUNCNAME, 0, EF_CANDEFAULT ); */ + #if 0 + hb_errRT_BASE_Ext1( EG_GTRESUME, 6002, NULL, HB_ERR_FUNCNAME, 0, EF_CANDEFAULT ); + #endif } } } diff --git a/src/rtl/sha1.c b/src/rtl/sha1.c index fe7a7e13bb..31451adfad 100644 --- a/src/rtl/sha1.c +++ b/src/rtl/sha1.c @@ -102,7 +102,9 @@ static void SHA1_Transform(sha1_quadbyte state[5], sha1_byte buffer[64]) { state[3] += d; state[4] += e; /* Wipe variables */ - /* a = b = c = d = e = 0; */ + #if 0 + a = b = c = d = e = 0; + #endif } @@ -160,7 +162,9 @@ void hb_SHA1_Final(sha1_byte digest[SHA1_DIGEST_LENGTH], SHA_CTX *context) { ((context->state[i>>2] >> ((3-(i & 3)) * 8) ) & 255); } /* Wipe variables */ - /* i = 0; */ + #if 0 + i = 0; + #endif memset(context->buffer, 0, SHA1_BLOCK_LENGTH); memset(context->state, 0, SHA1_DIGEST_LENGTH); memset(context->count, 0, 8); diff --git a/src/rtl/space.c b/src/rtl/space.c index 034ac8cfc1..94e3e5e828 100644 --- a/src/rtl/space.c +++ b/src/rtl/space.c @@ -65,7 +65,9 @@ HB_FUNC( SPACE ) /* NOTE: String overflow could never occur since a string can be as large as ULONG_MAX, and the maximum length that can be specified is LONG_MAX here. [vszakats] */ - /* hb_errRT_BASE( EG_STROVERFLOW, 1233, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS ); */ + #if 0 + hb_errRT_BASE( EG_STROVERFLOW, 1233, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS ); + #endif hb_xmemset( szResult, ' ', nLen ); hb_retclen_buffer( szResult, nLen ); diff --git a/src/vm/classes.c b/src/vm/classes.c index 4aa6b6d0b4..b3aeb59692 100644 --- a/src/vm/classes.c +++ b/src/vm/classes.c @@ -222,8 +222,10 @@ HB_FUNC_STATIC( msgNull ); HB_FUNC_STATIC( msgClassH ); HB_FUNC_STATIC( msgClassName ); HB_FUNC_STATIC( msgClassSel ); -/* HB_FUNC_STATIC( msgClass ); */ -/* HB_FUNC_STATIC( msgClassParent ); */ +#if 0 +HB_FUNC_STATIC( msgClass ); +HB_FUNC_STATIC( msgClassParent ); +#endif /* --- */ @@ -4969,7 +4971,9 @@ HB_FUNC_STATIC( msgSetData ) /* No comment :-) */ HB_FUNC_STATIC( msgVirtual ) { - /* hb_ret(); */ /* NOTE: It's safe to comment this out */ + #if 0 + hb_ret(); /* NOTE: It's safe to have this commented out. */ + #endif } HB_FUNC_STATIC( msgNull ) diff --git a/src/vm/hvm.c b/src/vm/hvm.c index df1b0f7b1c..56ae4b93fd 100644 --- a/src/vm/hvm.c +++ b/src/vm/hvm.c @@ -668,7 +668,9 @@ void hb_vmTerminateThreads( void ) hb_threadCondWait( &s_vmCond, &s_vmMtx ); ++s_iRunningCount; - /* hb_vmThreadRequest &= ~HB_THREQUEST_QUIT; */ + #if 0 + hb_vmThreadRequest &= ~HB_THREQUEST_QUIT; + #endif hb_vmThreadRequest = 0; HB_VM_UNLOCK(); @@ -5053,7 +5055,9 @@ static const HB_BYTE * hb_vmSwitch( const HB_BYTE * pCode, HB_USHORT casesCnt ) case HB_P_PUSHSTRSHORT: if( HB_IS_STRING( pSwitch ) ) { - /*fFound = hb_itemStrCmp( pItem1, pItem2, bExact );*/ + #if 0 + fFound = hb_itemStrCmp( pItem1, pItem2, bExact ); + #endif fFound = ( HB_SIZE ) pCode[ 1 ] - 1 == pSwitch->item.asString.length && memcmp( pSwitch->item.asString.value, &pCode[ 2 ], pSwitch->item.asString.length ) == 0; @@ -8546,7 +8550,10 @@ static PHB_ITEM hb_vmMsgRefWrite( PHB_ITEM pRefer, PHB_ITEM pSource ) pMsgRef->value.type |= HB_IT_DEFAULT; hb_stackPopReturn(); } - return NULL; /*&pMsgIdxRef->value;*/ + return NULL; + #if 0 + return &pMsgIdxRef->value; + #endif } static void hb_vmMsgRefCopy( PHB_ITEM pDest ) @@ -8699,7 +8706,10 @@ static PHB_ITEM hb_vmMsgIdxRefWrite( PHB_ITEM pRefer, PHB_ITEM pSource ) pMsgIdxRef->value.type |= HB_IT_DEFAULT; } - return NULL; /*&pMsgIdxRef->value;*/ + return NULL; + #if 0 + return &pMsgIdxRef->value; + #endif } static void hb_vmMsgIdxRefCopy( PHB_ITEM pDest ) diff --git a/src/vm/itemapi.c b/src/vm/itemapi.c index 1cf763c61c..6f2ad55a9a 100644 --- a/src/vm/itemapi.c +++ b/src/vm/itemapi.c @@ -2509,7 +2509,9 @@ HB_BOOL hb_itemStrBuf( char * szResult, PHB_ITEM pNumber, int iSize, int iDec ) double dInt, dFract, dDig, doBase = 10.0; int iPrec, iFirst = -1; - /* dNumber = hb_numRound( dNumber, iDec ); */ + #if 0 + dNumber = hb_numRound( dNumber, iDec ); + #endif #ifdef HB_NUM_PRECISION iPrec = HB_NUM_PRECISION; diff --git a/src/vm/set.c b/src/vm/set.c index 6b7a53b739..c2b7708815 100644 --- a/src/vm/set.c +++ b/src/vm/set.c @@ -1116,7 +1116,9 @@ void hb_setInitialize( PHB_SET_STRUCT pSet ) * IMHO it's a bug in Clipper (side effect of some internal solutions) and * we should not try to emulate it [druzus]. */ - /* pSet->HB_SET_DEBUG = HB_FALSE; */ + #if 0 + pSet->HB_SET_DEBUG = HB_FALSE; + #endif pSet->HB_SET_DEBUG = hb_dynsymFind( "__DBGENTRY" ) ? HB_TRUE : HB_FALSE; pSet->HB_SET_DECIMALS = 2; pSet->HB_SET_DEFAULT = hb_strdup( "" ); diff --git a/src/vm/thread.c b/src/vm/thread.c index e703447acb..72c7358842 100644 --- a/src/vm/thread.c +++ b/src/vm/thread.c @@ -339,7 +339,9 @@ static void _hb_thread_wait_add( HB_COND_T * cond, PHB_WAIT_LIST pWaiting ) /* It's not necessary because we have workaround for possible race * condition inside _hb_thread_cond_wait() function */ - /* WaitForSingleObject( pWaiting->cond, 0 ); */ + #if 0 + WaitForSingleObject( pWaiting->cond, 0 ); + #endif #endif pWaiting->signaled = HB_FALSE;