From 8be149614cd2e04516788c1a7c7db151dc5eb62f Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Sun, 9 Nov 2008 16:16:54 +0000 Subject: [PATCH] 2008-11-09 17:15 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * source/vm/arrays.c * source/vm/classes.c * source/vm/cmdarg.c * source/vm/codebloc.c * source/vm/debug.c * source/vm/dynsym.c * source/vm/extend.c * source/vm/fm.c * source/vm/hashes.c * source/vm/hvm.c * source/vm/itemapi.c * source/vm/maindll.c * source/vm/maindllh.c * source/vm/maindllp.c * source/vm/mainstd.c * source/vm/mainwin.c * source/vm/set.c * source/vm/vm.c % Removed HB_EXPORT from remaining function definitions. --- harbour/ChangeLog | 21 ++ harbour/source/vm/arrays.c | 62 +++--- harbour/source/vm/classes.c | 26 +-- harbour/source/vm/cmdarg.c | 18 +- harbour/source/vm/codebloc.c | 2 +- harbour/source/vm/debug.c | 2 +- harbour/source/vm/dynsym.c | 26 +-- harbour/source/vm/extend.c | 118 +++++------ harbour/source/vm/fm.c | 20 +- harbour/source/vm/hashes.c | 52 ++--- harbour/source/vm/hvm.c | 394 +++++++++++++++++------------------ harbour/source/vm/itemapi.c | 150 ++++++------- harbour/source/vm/maindll.c | 8 +- harbour/source/vm/maindllh.c | 2 +- harbour/source/vm/maindllp.c | 2 +- harbour/source/vm/mainstd.c | 2 +- harbour/source/vm/mainwin.c | 2 +- harbour/source/vm/set.c | 142 ++++++------- harbour/source/vm/vm.c | 32 +-- 19 files changed, 551 insertions(+), 530 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index d2f37a7181..44f05d18d6 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,27 @@ 2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org) */ +2008-11-09 17:15 UTC+0100 Viktor Szakats (harbour.01 syenar hu) + * source/vm/arrays.c + * source/vm/classes.c + * source/vm/cmdarg.c + * source/vm/codebloc.c + * source/vm/debug.c + * source/vm/dynsym.c + * source/vm/extend.c + * source/vm/fm.c + * source/vm/hashes.c + * source/vm/hvm.c + * source/vm/itemapi.c + * source/vm/maindll.c + * source/vm/maindllh.c + * source/vm/maindllp.c + * source/vm/mainstd.c + * source/vm/mainwin.c + * source/vm/set.c + * source/vm/vm.c + % Removed HB_EXPORT from remaining function definitions. + 2008-11-09 17:03 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * contrib/gtwvg/wvgcore.c * contrib/gtwvg/wvgutils.c diff --git a/harbour/source/vm/arrays.c b/harbour/source/vm/arrays.c index 3c8a71dddd..bea7a3aa2b 100644 --- a/harbour/source/vm/arrays.c +++ b/harbour/source/vm/arrays.c @@ -153,7 +153,7 @@ static HB_GARBAGE_FUNC( hb_arrayReleaseGarbage ) hb_arrayReleaseItems( pBaseArray ); } -HB_EXPORT BOOL hb_arrayNew( PHB_ITEM pItem, ULONG ulLen ) /* creates a new array */ +BOOL hb_arrayNew( PHB_ITEM pItem, ULONG ulLen ) /* creates a new array */ { PHB_BASEARRAY pBaseArray; PHB_ITEM pItems; @@ -190,7 +190,7 @@ HB_EXPORT BOOL hb_arrayNew( PHB_ITEM pItem, ULONG ulLen ) /* creates a new array return TRUE; } -HB_EXPORT BOOL hb_arraySize( PHB_ITEM pArray, ULONG ulLen ) +BOOL hb_arraySize( PHB_ITEM pArray, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySize(%p, %lu)", pArray, ulLen)); @@ -247,7 +247,7 @@ HB_EXPORT BOOL hb_arraySize( PHB_ITEM pArray, ULONG ulLen ) return FALSE; } -HB_EXPORT ULONG hb_arrayLen( PHB_ITEM pArray ) +ULONG hb_arrayLen( PHB_ITEM pArray ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayLen(%p)", pArray)); @@ -257,7 +257,7 @@ HB_EXPORT ULONG hb_arrayLen( PHB_ITEM pArray ) return 0; } -HB_EXPORT BOOL hb_arrayIsObject( PHB_ITEM pArray ) +BOOL hb_arrayIsObject( PHB_ITEM pArray ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayIsObject(%p)", pArray)); @@ -268,7 +268,7 @@ HB_EXPORT BOOL hb_arrayIsObject( PHB_ITEM pArray ) } /* retrives the array unique ID */ -HB_EXPORT void * hb_arrayId( PHB_ITEM pArray ) +void * hb_arrayId( PHB_ITEM pArray ) { if( HB_IS_ARRAY( pArray ) ) return ( void * ) pArray->item.asArray.value; @@ -276,7 +276,7 @@ HB_EXPORT void * hb_arrayId( PHB_ITEM pArray ) return NULL; } -HB_EXPORT BOOL hb_arrayAdd( PHB_ITEM pArray, PHB_ITEM pValue ) +BOOL hb_arrayAdd( PHB_ITEM pArray, PHB_ITEM pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayAdd(%p, %p)", pArray, pValue)); @@ -297,7 +297,7 @@ HB_EXPORT BOOL hb_arrayAdd( PHB_ITEM pArray, PHB_ITEM pValue ) return FALSE; } -HB_EXPORT BOOL hb_arrayAddForward( PHB_ITEM pArray, PHB_ITEM pValue ) +BOOL hb_arrayAddForward( PHB_ITEM pArray, PHB_ITEM pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayAddForward(%p, %p)", pArray, pValue)); @@ -318,7 +318,7 @@ HB_EXPORT BOOL hb_arrayAddForward( PHB_ITEM pArray, PHB_ITEM pValue ) return FALSE; } -HB_EXPORT BOOL hb_arrayDel( PHB_ITEM pArray, ULONG ulIndex ) +BOOL hb_arrayDel( PHB_ITEM pArray, ULONG ulIndex ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayDel(%p, %lu)", pArray, ulIndex)); @@ -348,7 +348,7 @@ HB_EXPORT BOOL hb_arrayDel( PHB_ITEM pArray, ULONG ulIndex ) return FALSE; } -HB_EXPORT BOOL hb_arrayIns( PHB_ITEM pArray, ULONG ulIndex ) +BOOL hb_arrayIns( PHB_ITEM pArray, ULONG ulIndex ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayIns(%p, %lu)", pArray, ulIndex)); @@ -378,7 +378,7 @@ HB_EXPORT BOOL hb_arrayIns( PHB_ITEM pArray, ULONG ulIndex ) return FALSE; } -HB_EXPORT BOOL hb_arraySet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) +BOOL hb_arraySet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySet(%p, %lu, %p)", pArray, ulIndex, pItem)); @@ -391,7 +391,7 @@ HB_EXPORT BOOL hb_arraySet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) return FALSE; } -HB_EXPORT BOOL hb_arraySetForward( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) +BOOL hb_arraySetForward( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetForward(%p, %lu, %p)", pArray, ulIndex, pItem)); @@ -407,7 +407,7 @@ HB_EXPORT BOOL hb_arraySetForward( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pIte } } -HB_EXPORT BOOL hb_arrayGet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) +BOOL hb_arrayGet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayGet(%p, %lu, %p)", pArray, ulIndex, pItem)); @@ -423,7 +423,7 @@ HB_EXPORT BOOL hb_arrayGet( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) } } -HB_EXPORT BOOL hb_arrayGetItemRef( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) +BOOL hb_arrayGetItemRef( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_arrayGetItemRef(%p, %lu, %p)", pArray, ulIndex, pItem)); @@ -629,7 +629,7 @@ HB_TYPE hb_arrayGetType( PHB_ITEM pArray, ULONG ulIndex ) return 0; } -HB_EXPORT BOOL hb_arraySetDS( PHB_ITEM pArray, ULONG ulIndex, const char * szDate ) +BOOL hb_arraySetDS( PHB_ITEM pArray, ULONG ulIndex, const char * szDate ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetDS(%p, %lu, %s)", pArray, ulIndex, szDate)); @@ -642,7 +642,7 @@ HB_EXPORT BOOL hb_arraySetDS( PHB_ITEM pArray, ULONG ulIndex, const char * szDat return FALSE; } -HB_EXPORT BOOL hb_arraySetDL( PHB_ITEM pArray, ULONG ulIndex, LONG lDate ) +BOOL hb_arraySetDL( PHB_ITEM pArray, ULONG ulIndex, LONG lDate ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetDL(%p, %lu, %ld)", pArray, ulIndex, lDate)); @@ -655,7 +655,7 @@ HB_EXPORT BOOL hb_arraySetDL( PHB_ITEM pArray, ULONG ulIndex, LONG lDate ) return FALSE; } -HB_EXPORT BOOL hb_arraySetL( PHB_ITEM pArray, ULONG ulIndex, BOOL fValue ) +BOOL hb_arraySetL( PHB_ITEM pArray, ULONG ulIndex, BOOL fValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetL(%p, %lu, %d)", pArray, ulIndex, fValue)); @@ -668,7 +668,7 @@ HB_EXPORT BOOL hb_arraySetL( PHB_ITEM pArray, ULONG ulIndex, BOOL fValue ) return FALSE; } -HB_EXPORT BOOL hb_arraySetNI( PHB_ITEM pArray, ULONG ulIndex, int iNumber ) +BOOL hb_arraySetNI( PHB_ITEM pArray, ULONG ulIndex, int iNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetNI(%p, %lu, %d)", pArray, ulIndex, iNumber)); @@ -681,7 +681,7 @@ HB_EXPORT BOOL hb_arraySetNI( PHB_ITEM pArray, ULONG ulIndex, int iNumber ) return FALSE; } -HB_EXPORT BOOL hb_arraySetNL( PHB_ITEM pArray, ULONG ulIndex, LONG lNumber ) +BOOL hb_arraySetNL( PHB_ITEM pArray, ULONG ulIndex, LONG lNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetNL(%p, %lu, %lu)", pArray, ulIndex, lNumber)); @@ -695,7 +695,7 @@ HB_EXPORT BOOL hb_arraySetNL( PHB_ITEM pArray, ULONG ulIndex, LONG lNumber ) } #ifndef HB_LONG_LONG_OFF -HB_EXPORT BOOL hb_arraySetNLL( PHB_ITEM pArray, ULONG ulIndex, LONGLONG llNumber ) +BOOL hb_arraySetNLL( PHB_ITEM pArray, ULONG ulIndex, LONGLONG llNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetNLL(%p, %lu, %" PFLL "d)", pArray, ulIndex, llNumber)); @@ -709,7 +709,7 @@ HB_EXPORT BOOL hb_arraySetNLL( PHB_ITEM pArray, ULONG ulIndex, LONGLONG llNumber } #endif -HB_EXPORT BOOL hb_arraySetNInt( PHB_ITEM pArray, ULONG ulIndex, HB_LONG lNumber ) +BOOL hb_arraySetNInt( PHB_ITEM pArray, ULONG ulIndex, HB_LONG lNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetNInt(%p, %lu, %" PFHL "d)", pArray, ulIndex, lNumber)); @@ -722,7 +722,7 @@ HB_EXPORT BOOL hb_arraySetNInt( PHB_ITEM pArray, ULONG ulIndex, HB_LONG lNumber return FALSE; } -HB_EXPORT BOOL hb_arraySetND( PHB_ITEM pArray, ULONG ulIndex, double dNumber ) +BOOL hb_arraySetND( PHB_ITEM pArray, ULONG ulIndex, double dNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetND(%p, %lu, %lf)", pArray, ulIndex, dNumber)); @@ -735,7 +735,7 @@ HB_EXPORT BOOL hb_arraySetND( PHB_ITEM pArray, ULONG ulIndex, double dNumber ) return FALSE; } -HB_EXPORT BOOL hb_arraySetC( PHB_ITEM pArray, ULONG ulIndex, const char * szText ) +BOOL hb_arraySetC( PHB_ITEM pArray, ULONG ulIndex, const char * szText ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetC(%p, %lu, %p)", pArray, ulIndex, szText)); @@ -748,7 +748,7 @@ HB_EXPORT BOOL hb_arraySetC( PHB_ITEM pArray, ULONG ulIndex, const char * szText return FALSE; } -HB_EXPORT BOOL hb_arraySetCL( PHB_ITEM pArray, ULONG ulIndex, const char * szText, ULONG ulLen ) +BOOL hb_arraySetCL( PHB_ITEM pArray, ULONG ulIndex, const char * szText, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetC(%p, %lu, %p, %lu)", pArray, ulIndex, szText, ulLen)); @@ -761,7 +761,7 @@ HB_EXPORT BOOL hb_arraySetCL( PHB_ITEM pArray, ULONG ulIndex, const char * szTex return FALSE; } -HB_EXPORT BOOL hb_arraySetCPtr( PHB_ITEM pArray, ULONG ulIndex, char * szText, ULONG ulLen ) +BOOL hb_arraySetCPtr( PHB_ITEM pArray, ULONG ulIndex, char * szText, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetCPtr(%p, %lu)", pArray, ulIndex, szText, ulLen)); @@ -774,7 +774,7 @@ HB_EXPORT BOOL hb_arraySetCPtr( PHB_ITEM pArray, ULONG ulIndex, char * szText, U return FALSE; } -HB_EXPORT BOOL hb_arraySetPtr( PHB_ITEM pArray, ULONG ulIndex, void * pValue ) +BOOL hb_arraySetPtr( PHB_ITEM pArray, ULONG ulIndex, void * pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetPtr(%p, %lu, %p)", pArray, ulIndex, pValue)); @@ -787,7 +787,7 @@ HB_EXPORT BOOL hb_arraySetPtr( PHB_ITEM pArray, ULONG ulIndex, void * pValue ) return FALSE; } -HB_EXPORT BOOL hb_arraySetPtrGC( PHB_ITEM pArray, ULONG ulIndex, void * pValue ) +BOOL hb_arraySetPtrGC( PHB_ITEM pArray, ULONG ulIndex, void * pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetPtrGC(%p, %lu, %p)", pArray, ulIndex, pValue)); @@ -800,7 +800,7 @@ HB_EXPORT BOOL hb_arraySetPtrGC( PHB_ITEM pArray, ULONG ulIndex, void * pValue ) return FALSE; } -HB_EXPORT BOOL hb_arraySetSymbol( PHB_ITEM pArray, ULONG ulIndex, PHB_SYMB pSymbol ) +BOOL hb_arraySetSymbol( PHB_ITEM pArray, ULONG ulIndex, PHB_SYMB pSymbol ) { HB_TRACE(HB_TR_DEBUG, ("hb_arraySetSymbol(%p, %lu, %p)", pArray, ulIndex, pSymbol)); @@ -1358,7 +1358,7 @@ void hb_cloneNested( PHB_ITEM pDstItem, PHB_ITEM pSrcItem, PHB_NESTED_CLONED pCl hb_itemCopy( pDstItem, pSrcItem ); } -HB_EXPORT PHB_ITEM hb_arrayClone( PHB_ITEM pSrcArray ) +PHB_ITEM hb_arrayClone( PHB_ITEM pSrcArray ) { PHB_ITEM pDstArray; @@ -1390,7 +1390,7 @@ HB_EXPORT PHB_ITEM hb_arrayClone( PHB_ITEM pSrcArray ) return pDstArray; } -HB_EXPORT PHB_ITEM hb_arrayFromStack( USHORT uiLen ) +PHB_ITEM hb_arrayFromStack( USHORT uiLen ) { PHB_ITEM pArray = hb_itemNew( NULL ); USHORT uiPos; @@ -1430,7 +1430,7 @@ PHB_ITEM hb_arrayFromParams( int iLevel ) return pArray; } -HB_EXPORT PHB_ITEM hb_arrayBaseParams( void ) +PHB_ITEM hb_arrayBaseParams( void ) { PHB_ITEM pArray; USHORT uiPos, uiPCount; @@ -1450,7 +1450,7 @@ HB_EXPORT PHB_ITEM hb_arrayBaseParams( void ) return pArray; } -HB_EXPORT PHB_ITEM hb_arraySelfParams( void ) +PHB_ITEM hb_arraySelfParams( void ) { PHB_ITEM pArray; USHORT uiPos, uiPCount; diff --git a/harbour/source/vm/classes.c b/harbour/source/vm/classes.c index 1210bea0b3..bc3bd7da80 100644 --- a/harbour/source/vm/classes.c +++ b/harbour/source/vm/classes.c @@ -1225,7 +1225,7 @@ void hb_clsIsClassRef( void ) #endif } -HB_EXPORT BOOL hb_clsIsParent( USHORT uiClass, const char * szParentName ) +BOOL hb_clsIsParent( USHORT uiClass, const char * szParentName ) { if( uiClass && uiClass <= s_uiClasses ) { @@ -1245,7 +1245,7 @@ HB_EXPORT BOOL hb_clsIsParent( USHORT uiClass, const char * szParentName ) return FALSE; } -HB_EXPORT USHORT hb_objGetClass( PHB_ITEM pItem ) +USHORT hb_objGetClass( PHB_ITEM pItem ) { if( pItem && HB_IS_ARRAY( pItem ) ) return pItem->item.asArray.value->uiClass; @@ -1254,7 +1254,7 @@ HB_EXPORT USHORT hb_objGetClass( PHB_ITEM pItem ) } /* get object class handle using class name and class function name */ -HB_EXPORT USHORT hb_objSetClass( PHB_ITEM pItem, const char * szClass, const char * szFunc ) +USHORT hb_objSetClass( PHB_ITEM pItem, const char * szClass, const char * szFunc ) { USHORT uiClass = 0; @@ -1317,7 +1317,7 @@ static USHORT hb_objGetClassH( PHB_ITEM pObject ) /* * Get the class name of an object */ -HB_EXPORT const char * hb_objGetClsName( PHB_ITEM pObject ) +const char * hb_objGetClsName( PHB_ITEM pObject ) { HB_TRACE(HB_TR_DEBUG, ("hb_objGetClsName(%p)", pObject)); @@ -1360,7 +1360,7 @@ HB_EXPORT const char * hb_objGetClsName( PHB_ITEM pObject ) return "UNKNOWN"; } -HB_EXPORT const char * hb_clsName( USHORT uiClass ) +const char * hb_clsName( USHORT uiClass ) { if( uiClass && uiClass <= s_uiClasses ) return s_pClasses[ uiClass ]->szName; @@ -1368,7 +1368,7 @@ HB_EXPORT const char * hb_clsName( USHORT uiClass ) return NULL; } -HB_EXPORT const char * hb_clsFuncName( USHORT uiClass ) +const char * hb_clsFuncName( USHORT uiClass ) { if( uiClass && uiClass <= s_uiClasses ) return s_pClasses[ uiClass ]->pClassFuncSym ? @@ -1378,7 +1378,7 @@ HB_EXPORT const char * hb_clsFuncName( USHORT uiClass ) return NULL; } -HB_EXPORT USHORT hb_clsFindClass( const char * szClass, const char * szFunc ) +USHORT hb_clsFindClass( const char * szClass, const char * szFunc ) { USHORT uiClass; @@ -1413,7 +1413,7 @@ static USHORT hb_clsFindClassByFunc( PHB_SYMB pClassFuncSym ) * Will return the class name from wich the message is inherited in case * of inheritance. */ -HB_EXPORT const char * hb_objGetRealClsName( PHB_ITEM pObject, const char * szName ) +const char * hb_objGetRealClsName( PHB_ITEM pObject, const char * szName ) { USHORT uiClass; @@ -2219,7 +2219,7 @@ BOOL hb_objOperatorCall( USHORT uiOperator, HB_ITEM_PTR pResult, PHB_ITEM pObjec /* * return TRUE if object has a given message */ -HB_EXPORT BOOL hb_objHasMessage( PHB_ITEM pObject, PHB_DYNS pMessage ) +BOOL hb_objHasMessage( PHB_ITEM pObject, PHB_DYNS pMessage ) { return hb_objGetMethod( pObject, pMessage->pSymbol, NULL ) != NULL; } @@ -2231,7 +2231,7 @@ HB_EXPORT BOOL hb_objHasMessage( PHB_ITEM pObject, PHB_DYNS pMessage ) * * should be read as a boolean */ -HB_EXPORT BOOL hb_objHasMsg( PHB_ITEM pObject, const char *szString ) +BOOL hb_objHasMsg( PHB_ITEM pObject, const char *szString ) { PHB_DYNS pDynSym; @@ -2248,7 +2248,7 @@ HB_EXPORT BOOL hb_objHasMsg( PHB_ITEM pObject, const char *szString ) } } -HB_EXPORT PHB_ITEM hb_objSendMessage( PHB_ITEM pObject, PHB_DYNS pMsgSym, ULONG ulArg, ... ) +PHB_ITEM hb_objSendMessage( PHB_ITEM pObject, PHB_DYNS pMsgSym, ULONG ulArg, ... ) { if( pObject && pMsgSym ) { @@ -2275,7 +2275,7 @@ HB_EXPORT PHB_ITEM hb_objSendMessage( PHB_ITEM pObject, PHB_DYNS pMsgSym, ULONG return hb_stackReturnItem(); } -HB_EXPORT PHB_ITEM hb_objSendMsg( PHB_ITEM pObject, const char *sMsg, ULONG ulArg, ... ) +PHB_ITEM hb_objSendMsg( PHB_ITEM pObject, const char *sMsg, ULONG ulArg, ... ) { hb_vmPushSymbol( hb_dynsymGet( sMsg )->pSymbol ); hb_vmPush( pObject ); @@ -2339,7 +2339,7 @@ static PHB_SYMB hb_objGetFuncSym( PHB_ITEM pItem ) } /* send message which allows to set execution context for debugger */ -HB_EXPORT void hb_dbgObjSendMessage( int iProcLevel, PHB_ITEM pObject, PHB_ITEM pMessage, int iParamOffset ) +void hb_dbgObjSendMessage( int iProcLevel, PHB_ITEM pObject, PHB_ITEM pMessage, int iParamOffset ) { PHB_DYNS pMsgSym; diff --git a/harbour/source/vm/cmdarg.c b/harbour/source/vm/cmdarg.c index c0a352068e..aef4535bbf 100644 --- a/harbour/source/vm/cmdarg.c +++ b/harbour/source/vm/cmdarg.c @@ -91,7 +91,7 @@ HB_EXTERN_BEGIN HB_EXTERN_END -HB_EXPORT void hb_winmainArgInit( HANDLE hInstance, HANDLE hPrevInstance, int iCmdShow ) +void hb_winmainArgInit( HANDLE hInstance, HANDLE hPrevInstance, int iCmdShow ) { s_hInstance = hInstance; s_hPrevInstance = hPrevInstance; @@ -99,7 +99,7 @@ HB_EXPORT void hb_winmainArgInit( HANDLE hInstance, HANDLE hPrevInstance, int iC s_WinMainParam = TRUE; } -HB_EXPORT BOOL hb_winmainArgGet( HANDLE * phInstance, HANDLE * phPrevInstance, int * piCmdShow ) +BOOL hb_winmainArgGet( HANDLE * phInstance, HANDLE * phPrevInstance, int * piCmdShow ) { if( phInstance ) *phInstance = s_hInstance; @@ -113,7 +113,7 @@ HB_EXPORT BOOL hb_winmainArgGet( HANDLE * phInstance, HANDLE * phPrevInstance, i #endif -HB_EXPORT void hb_cmdargInit( int argc, char * argv[] ) +void hb_cmdargInit( int argc, char * argv[] ) { HB_TRACE(HB_TR_DEBUG, ("hb_cmdargInit(%d, %p)", argc, argv)); @@ -466,25 +466,25 @@ ULONG hb_cmdargProcessVM( int *pCancelKey, int *pCancelKeyEx ) } /* ChangeLog SVN revision number */ -HB_EXPORT int hb_verSvnID( void ) +int hb_verSvnID( void ) { return HB_VER_SVNID; } /* ChangeLog ID string */ -HB_EXPORT const char * hb_verSvnChangeLogID( void ) +const char * hb_verSvnChangeLogID( void ) { return HB_VER_CHLID; } /* ChangeLog last entry string */ -HB_EXPORT const char * hb_verSvnLastEntry( void ) +const char * hb_verSvnLastEntry( void ) { return HB_VER_LENTRY; } /* build time C compiler flags in C_USR envvar */ -HB_EXPORT const char * hb_verFlagsC( void ) +const char * hb_verFlagsC( void ) { #ifdef HB_VER_C_USR return HB_VER_C_USR; @@ -494,7 +494,7 @@ HB_EXPORT const char * hb_verFlagsC( void ) } /* build time linker flags in L_USR envvar */ -HB_EXPORT const char * hb_verFlagsL( void ) +const char * hb_verFlagsL( void ) { #ifdef HB_VER_L_USR return HB_VER_L_USR; @@ -504,7 +504,7 @@ HB_EXPORT const char * hb_verFlagsL( void ) } /* build time Harbour compiler flags in PRG_USR envvar */ -HB_EXPORT const char * hb_verFlagsPRG( void ) +const char * hb_verFlagsPRG( void ) { #ifdef HB_VER_PRG_USR return HB_VER_PRG_USR; diff --git a/harbour/source/vm/codebloc.c b/harbour/source/vm/codebloc.c index ed594664ca..a453b2f04a 100644 --- a/harbour/source/vm/codebloc.c +++ b/harbour/source/vm/codebloc.c @@ -299,7 +299,7 @@ PHB_ITEM hb_codeblockGetRef( HB_CODEBLOCK_PTR pCBlock, LONG iItemPos ) /* retrieves the codeblock unique ID */ -HB_EXPORT void * hb_codeblockId( PHB_ITEM pItem ) +void * hb_codeblockId( PHB_ITEM pItem ) { if( HB_IS_BLOCK( pItem ) ) return ( void * ) pItem->item.asBlock.value; diff --git a/harbour/source/vm/debug.c b/harbour/source/vm/debug.c index a6da543d2b..e8f887e9c7 100644 --- a/harbour/source/vm/debug.c +++ b/harbour/source/vm/debug.c @@ -184,7 +184,7 @@ HB_FUNC( __DBGVMPARLLIST ) hb_itemReturnRelease( hb_arrayFromParams( hb_parni( 1 ) + 1 ) ); } -HB_EXPORT PHB_ITEM hb_dbg_vmVarLGet( int iLevel, int iLocal ) +PHB_ITEM hb_dbg_vmVarLGet( int iLevel, int iLocal ) { PHB_ITEM pLocal = NULL; LONG lBaseOffset; diff --git a/harbour/source/vm/dynsym.c b/harbour/source/vm/dynsym.c index 71a3722d0c..f875bb0d62 100644 --- a/harbour/source/vm/dynsym.c +++ b/harbour/source/vm/dynsym.c @@ -189,7 +189,7 @@ static PHB_SYMB hb_symbolAlloc( const char * szName ) } /* Find symbol in dynamic symbol table */ -HB_EXPORT PHB_DYNS hb_dynsymFind( const char * szName ) +PHB_DYNS hb_dynsymFind( const char * szName ) { UINT uiFirst, uiLast; @@ -222,7 +222,7 @@ HB_EXPORT PHB_DYNS hb_dynsymFind( const char * szName ) } /* Create new symbol */ -HB_EXPORT PHB_SYMB hb_symbolNew( const char * szName ) +PHB_SYMB hb_symbolNew( const char * szName ) { PHB_SYMB pSymbol; @@ -238,7 +238,7 @@ HB_EXPORT PHB_SYMB hb_symbolNew( const char * szName ) } /* creates a new dynamic symbol */ -HB_EXPORT PHB_DYNS hb_dynsymNew( PHB_SYMB pSymbol ) +PHB_DYNS hb_dynsymNew( PHB_SYMB pSymbol ) { PHB_DYNS pDynSym; UINT uiPos; @@ -358,7 +358,7 @@ HB_EXPORT PHB_DYNS hb_dynsymNew( PHB_SYMB pSymbol ) } /* finds and creates a symbol if not found */ -HB_EXPORT PHB_DYNS hb_dynsymGetCase( const char * szName ) +PHB_DYNS hb_dynsymGetCase( const char * szName ) { PHB_DYNS pDynSym; UINT uiPos; @@ -376,7 +376,7 @@ HB_EXPORT PHB_DYNS hb_dynsymGetCase( const char * szName ) return pDynSym; } -HB_EXPORT PHB_DYNS hb_dynsymGet( const char * szName ) /* finds and creates a symbol if not found */ +PHB_DYNS hb_dynsymGet( const char * szName ) /* finds and creates a symbol if not found */ { char szUprName[ HB_SYMBOL_NAME_LEN + 1 ]; @@ -405,7 +405,7 @@ HB_EXPORT PHB_DYNS hb_dynsymGet( const char * szName ) /* finds and creates a s return hb_dynsymGetCase( szUprName ); } -HB_EXPORT PHB_DYNS hb_dynsymFindName( const char * szName ) /* finds a symbol */ +PHB_DYNS hb_dynsymFindName( const char * szName ) /* finds a symbol */ { char szUprName[ HB_SYMBOL_NAME_LEN + 1 ]; @@ -434,14 +434,14 @@ HB_EXPORT PHB_DYNS hb_dynsymFindName( const char * szName ) /* finds a symbol * return hb_dynsymFind( szUprName ); } -HB_EXPORT PHB_SYMB hb_dynsymGetSymbol( const char * szName ) +PHB_SYMB hb_dynsymGetSymbol( const char * szName ) { HB_TRACE(HB_TR_DEBUG, ("hb_dynsymGetSymbol(%s)", szName)); return hb_dynsymGet( szName )->pSymbol; } -HB_EXPORT PHB_SYMB hb_dynsymFindSymbol( const char * szName ) +PHB_SYMB hb_dynsymFindSymbol( const char * szName ) { PHB_DYNS pDynSym; @@ -451,21 +451,21 @@ HB_EXPORT PHB_SYMB hb_dynsymFindSymbol( const char * szName ) return pDynSym ? pDynSym->pSymbol : NULL; } -HB_EXPORT PHB_SYMB hb_dynsymSymbol( PHB_DYNS pDynSym ) +PHB_SYMB hb_dynsymSymbol( PHB_DYNS pDynSym ) { HB_TRACE(HB_TR_DEBUG, ("hb_dynsymSymbol(%p)", pDynSym)); return pDynSym->pSymbol; } -HB_EXPORT const char * hb_dynsymName( PHB_DYNS pDynSym ) +const char * hb_dynsymName( PHB_DYNS pDynSym ) { HB_TRACE(HB_TR_DEBUG, ("hb_dynsymName(%p)", pDynSym)); return pDynSym->pSymbol->szName; } -HB_EXPORT BOOL hb_dynsymIsFunction( PHB_DYNS pDynSym ) +BOOL hb_dynsymIsFunction( PHB_DYNS pDynSym ) { HB_TRACE(HB_TR_DEBUG, ("hb_dynsymIsFunction(%p)", pDynSym)); @@ -486,14 +486,14 @@ void hb_dynsymSetMemvar( PHB_DYNS pDynSym, PHB_ITEM pMemvar ) hb_dynsymHandles( pDynSym )->pMemvar = ( void * ) pMemvar; } -HB_EXPORT int hb_dynsymAreaHandle( PHB_DYNS pDynSym ) +int hb_dynsymAreaHandle( PHB_DYNS pDynSym ) { HB_TRACE(HB_TR_DEBUG, ("hb_dynsymAreaHandle(%p)", pDynSym)); return hb_dynsymHandles( pDynSym )->uiArea; } -HB_EXPORT void hb_dynsymSetAreaHandle( PHB_DYNS pDynSym, int iArea ) +void hb_dynsymSetAreaHandle( PHB_DYNS pDynSym, int iArea ) { HB_TRACE(HB_TR_DEBUG, ("hb_dynsymSetAreaHandle(%p,%d)", pDynSym, iArea)); diff --git a/harbour/source/vm/extend.c b/harbour/source/vm/extend.c index 70efa4b252..f8b038c8e9 100644 --- a/harbour/source/vm/extend.c +++ b/harbour/source/vm/extend.c @@ -78,7 +78,7 @@ /* NOTE: iParam = -1 can be used to access the return value. */ /* NOTE: iParam = 0 can be used to access the SELF object. */ -HB_EXPORT PHB_ITEM hb_param( int iParam, long lMask ) +PHB_ITEM hb_param( int iParam, long lMask ) { HB_TRACE(HB_TR_DEBUG, ("hb_param(%d, %ld)", iParam, lMask)); @@ -100,7 +100,7 @@ HB_EXPORT PHB_ITEM hb_param( int iParam, long lMask ) return NULL; } -HB_EXPORT PHB_ITEM hb_paramError( int iParam ) +PHB_ITEM hb_paramError( int iParam ) { static HB_ITEM s_NIL; @@ -118,7 +118,7 @@ HB_EXPORT PHB_ITEM hb_paramError( int iParam ) /* function to be called from pcode DLLs to detect if the extend system * is going to use an array item */ -HB_EXPORT BOOL hb_extIsArray( int iParam ) +BOOL hb_extIsArray( int iParam ) { PHB_ITEM pItem; @@ -138,7 +138,7 @@ HB_EXPORT BOOL hb_extIsArray( int iParam ) /* function to be called from pcode DLLs to detect if the extend system * is going to use an object item */ -HB_EXPORT BOOL hb_extIsObject( int iParam ) +BOOL hb_extIsObject( int iParam ) { PHB_ITEM pItem; @@ -158,7 +158,7 @@ HB_EXPORT BOOL hb_extIsObject( int iParam ) /* NOTE: Caller should not modify the buffer returned by this function. [vszakats] */ -HB_EXPORT char * hb_parc( int iParam, ... ) +char * hb_parc( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parc(%d, ...)", iParam)); @@ -187,7 +187,7 @@ HB_EXPORT char * hb_parc( int iParam, ... ) return ( char * ) NULL; } -HB_EXPORT char * hb_parcx( int iParam, ... ) +char * hb_parcx( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parcx(%d, ...)", iParam)); @@ -216,7 +216,7 @@ HB_EXPORT char * hb_parcx( int iParam, ... ) return ( char * ) ""; } -HB_EXPORT ULONG hb_parclen( int iParam, ... ) +ULONG hb_parclen( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parclen(%d, ...)", iParam)); @@ -249,7 +249,7 @@ HB_EXPORT ULONG hb_parclen( int iParam, ... ) terminating zero byte, and it only works for parameters passed by reference. [vszakats] */ -HB_EXPORT ULONG hb_parcsiz( int iParam, ... ) +ULONG hb_parcsiz( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parcsiz(%d, ...)", iParam)); @@ -286,7 +286,7 @@ HB_EXPORT ULONG hb_parcsiz( int iParam, ... ) /* NOTE: Using hb_stackDateBuffer() a temporary date buffer guaranties good behavior when multithreading. */ -HB_EXPORT char * hb_pards( int iParam, ... ) +char * hb_pards( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_pards(%d, ...)", iParam)); @@ -317,7 +317,7 @@ HB_EXPORT char * hb_pards( int iParam, ... ) /* NOTE: szDate must be a 9 chars wide buffer. [vszakats] */ -HB_EXPORT char * hb_pardsbuff( char * szDate, int iParam, ... ) +char * hb_pardsbuff( char * szDate, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_pardsbuff(%p, %d, ...)", szDate, iParam)); @@ -348,7 +348,7 @@ HB_EXPORT char * hb_pardsbuff( char * szDate, int iParam, ... ) /* retrieve a date as long integer - number of days from Julian's day */ -HB_EXPORT LONG hb_pardl( int iParam, ... ) +LONG hb_pardl( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_pardl(%d, ...)", iParam)); @@ -382,7 +382,7 @@ HB_EXPORT LONG hb_pardl( int iParam, ... ) } -HB_EXPORT int hb_parl( int iParam, ... ) +int hb_parl( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parl(%d, ...)", iParam)); @@ -417,7 +417,7 @@ HB_EXPORT int hb_parl( int iParam, ... ) return 0; } -HB_EXPORT double hb_parnd( int iParam, ... ) +double hb_parnd( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parnd(%d, ...)", iParam)); @@ -450,7 +450,7 @@ HB_EXPORT double hb_parnd( int iParam, ... ) return 0; } -HB_EXPORT int hb_parni( int iParam, ... ) +int hb_parni( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parni(%d, ...)", iParam)); @@ -483,7 +483,7 @@ HB_EXPORT int hb_parni( int iParam, ... ) return 0; } -HB_EXPORT long hb_parnl( int iParam, ... ) +long hb_parnl( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parnl(%d, ...)", iParam)); @@ -523,7 +523,7 @@ HB_EXPORT long hb_parnl( int iParam, ... ) } #ifndef HB_LONG_LONG_OFF -HB_EXPORT LONGLONG hb_parnll( int iParam, ... ) +LONGLONG hb_parnll( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parnll(%d, ...)", iParam)); @@ -563,7 +563,7 @@ HB_EXPORT LONGLONG hb_parnll( int iParam, ... ) } #endif -HB_EXPORT HB_LONG hb_parnint( int iParam, ... ) +HB_LONG hb_parnint( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parnint(%d, ...)", iParam)); @@ -602,7 +602,7 @@ HB_EXPORT HB_LONG hb_parnint( int iParam, ... ) return 0; } -HB_EXPORT void * hb_parptr( int iParam, ... ) +void * hb_parptr( int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parptr(%d, ...)", iParam)); @@ -631,7 +631,7 @@ HB_EXPORT void * hb_parptr( int iParam, ... ) return NULL; } -HB_EXPORT void * hb_parptrGC( HB_GARBAGE_FUNC_PTR pFunc, int iParam, ... ) +void * hb_parptrGC( HB_GARBAGE_FUNC_PTR pFunc, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_parptrGC(%p,%d, ...)", pFunc, iParam)); @@ -668,7 +668,7 @@ HB_EXPORT void * hb_parptrGC( HB_GARBAGE_FUNC_PTR pFunc, int iParam, ... ) return NULL; } -HB_EXPORT ULONG hb_parinfa( int iParamNum, ULONG uiArrayIndex ) +ULONG hb_parinfa( int iParamNum, ULONG uiArrayIndex ) { PHB_ITEM pArray; @@ -687,7 +687,7 @@ HB_EXPORT ULONG hb_parinfa( int iParamNum, ULONG uiArrayIndex ) return 0; } -HB_EXPORT ULONG hb_parinfo( int iParam ) +ULONG hb_parinfo( int iParam ) { HB_TRACE(HB_TR_DEBUG, ("hb_parinfo(%d)", iParam)); @@ -711,7 +711,7 @@ HB_EXPORT ULONG hb_parinfo( int iParam ) } #undef hb_ret -HB_EXPORT void hb_ret( void ) +void hb_ret( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_ret()")); @@ -719,7 +719,7 @@ HB_EXPORT void hb_ret( void ) } #undef hb_reta -HB_EXPORT void hb_reta( ULONG ulLen ) /* undocumented hb_reta() */ +void hb_reta( ULONG ulLen ) /* undocumented hb_reta() */ { HB_TRACE(HB_TR_DEBUG, ("hb_reta(%lu)", ulLen)); @@ -727,7 +727,7 @@ HB_EXPORT void hb_reta( ULONG ulLen ) /* undocumented hb_reta() */ } #undef hb_retc -HB_EXPORT void hb_retc( const char * szText ) +void hb_retc( const char * szText ) { HB_TRACE(HB_TR_DEBUG, ("hb_retc(%s)", szText)); @@ -735,7 +735,7 @@ HB_EXPORT void hb_retc( const char * szText ) } #undef hb_retc_null -HB_EXPORT void hb_retc_null( void ) +void hb_retc_null( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_retc_null()")); @@ -743,7 +743,7 @@ HB_EXPORT void hb_retc_null( void ) } #undef hb_retc_buffer -HB_EXPORT void hb_retc_buffer( char * szText ) +void hb_retc_buffer( char * szText ) { HB_TRACE(HB_TR_DEBUG, ("hb_retc_buffer(%s)", szText)); @@ -751,7 +751,7 @@ HB_EXPORT void hb_retc_buffer( char * szText ) } #undef hb_retc_const -HB_EXPORT void hb_retc_const( const char * szText ) +void hb_retc_const( const char * szText ) { HB_TRACE(HB_TR_DEBUG, ("hb_retc_const(%s)", szText)); @@ -759,7 +759,7 @@ HB_EXPORT void hb_retc_const( const char * szText ) } #undef hb_retclen -HB_EXPORT void hb_retclen( const char * szText, ULONG ulLen ) +void hb_retclen( const char * szText, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_retclen(%s, %lu)", szText, ulLen)); @@ -767,7 +767,7 @@ HB_EXPORT void hb_retclen( const char * szText, ULONG ulLen ) } #undef hb_retclen_buffer -HB_EXPORT void hb_retclen_buffer( char * szText, ULONG ulLen ) +void hb_retclen_buffer( char * szText, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_retclen_buffer(%s, %lu)", szText, ulLen)); @@ -777,7 +777,7 @@ HB_EXPORT void hb_retclen_buffer( char * szText, ULONG ulLen ) /* szDate must have YYYYMMDD format */ #undef hb_retds -HB_EXPORT void hb_retds( const char * szDate ) +void hb_retds( const char * szDate ) { HB_TRACE(HB_TR_DEBUG, ("hb_retds(%s)", szDate)); @@ -785,7 +785,7 @@ HB_EXPORT void hb_retds( const char * szDate ) } #undef hb_retd -HB_EXPORT void hb_retd( int iYear, int iMonth, int iDay ) +void hb_retd( int iYear, int iMonth, int iDay ) { HB_TRACE(HB_TR_DEBUG, ("hb_retd(%04i, %02i, %02i)", iYear, iMonth, iDay)); @@ -793,7 +793,7 @@ HB_EXPORT void hb_retd( int iYear, int iMonth, int iDay ) } #undef hb_retdl -HB_EXPORT void hb_retdl( long lJulian ) +void hb_retdl( long lJulian ) { HB_TRACE(HB_TR_DEBUG, ("hb_retdl(%ld)", lJulian)); @@ -801,7 +801,7 @@ HB_EXPORT void hb_retdl( long lJulian ) } #undef hb_retl -HB_EXPORT void hb_retl( int iLogical ) +void hb_retl( int iLogical ) { HB_TRACE(HB_TR_DEBUG, ("hb_retl(%d)", iLogical)); @@ -809,7 +809,7 @@ HB_EXPORT void hb_retl( int iLogical ) } #undef hb_retnd -HB_EXPORT void hb_retnd( double dNumber ) +void hb_retnd( double dNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnd(%lf)", dNumber)); @@ -817,7 +817,7 @@ HB_EXPORT void hb_retnd( double dNumber ) } #undef hb_retni -HB_EXPORT void hb_retni( int iNumber ) +void hb_retni( int iNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_retni(%d)", iNumber)); @@ -825,7 +825,7 @@ HB_EXPORT void hb_retni( int iNumber ) } #undef hb_retnl -HB_EXPORT void hb_retnl( long lNumber ) +void hb_retnl( long lNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnl(%ld)", lNumber)); @@ -834,7 +834,7 @@ HB_EXPORT void hb_retnl( long lNumber ) #ifndef HB_LONG_LONG_OFF #undef hb_retnll -HB_EXPORT void hb_retnll( LONGLONG llNumber ) +void hb_retnll( LONGLONG llNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnll(%" PFLL "d)", llNumber)); @@ -843,7 +843,7 @@ HB_EXPORT void hb_retnll( LONGLONG llNumber ) #endif #undef hb_retnint -HB_EXPORT void hb_retnint( HB_LONG lNumber ) +void hb_retnint( HB_LONG lNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnl(%ld)", lNumber)); @@ -851,7 +851,7 @@ HB_EXPORT void hb_retnint( HB_LONG lNumber ) } #undef hb_retnlen -HB_EXPORT void hb_retnlen( double dNumber, int iWidth, int iDec ) +void hb_retnlen( double dNumber, int iWidth, int iDec ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnlen(%lf, %d, %d)", dNumber, iWidth, iDec)); @@ -859,7 +859,7 @@ HB_EXPORT void hb_retnlen( double dNumber, int iWidth, int iDec ) } #undef hb_retndlen -HB_EXPORT void hb_retndlen( double dNumber, int iWidth, int iDec ) +void hb_retndlen( double dNumber, int iWidth, int iDec ) { HB_TRACE(HB_TR_DEBUG, ("hb_retndlen(%lf, %d, %d)", dNumber, iWidth, iDec)); @@ -867,7 +867,7 @@ HB_EXPORT void hb_retndlen( double dNumber, int iWidth, int iDec ) } #undef hb_retnilen -HB_EXPORT void hb_retnilen( int iNumber, int iWidth ) +void hb_retnilen( int iNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnilen(%d, %d)", iNumber, iWidth)); @@ -875,7 +875,7 @@ HB_EXPORT void hb_retnilen( int iNumber, int iWidth ) } #undef hb_retnllen -HB_EXPORT void hb_retnllen( long lNumber, int iWidth ) +void hb_retnllen( long lNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnllen(%ld, %d)", lNumber, iWidth)); @@ -884,7 +884,7 @@ HB_EXPORT void hb_retnllen( long lNumber, int iWidth ) #ifndef HB_LONG_LONG_OFF #undef hb_retnlllen -HB_EXPORT void hb_retnlllen( LONGLONG llNumber, int iWidth ) +void hb_retnlllen( LONGLONG llNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnlllen(%" PFLL "d, %d)", llNumber, iWidth)); @@ -893,7 +893,7 @@ HB_EXPORT void hb_retnlllen( LONGLONG llNumber, int iWidth ) #endif #undef hb_retnintlen -HB_EXPORT void hb_retnintlen( HB_LONG lNumber, int iWidth ) +void hb_retnintlen( HB_LONG lNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_retnintlen(%" PFHL "d, %d)", lNumber, iWidth)); @@ -901,7 +901,7 @@ HB_EXPORT void hb_retnintlen( HB_LONG lNumber, int iWidth ) } #undef hb_retptr -HB_EXPORT void hb_retptr( void * pointer ) +void hb_retptr( void * pointer ) { HB_TRACE(HB_TR_DEBUG, ("hb_retptr(%p)", pointer)); @@ -909,7 +909,7 @@ HB_EXPORT void hb_retptr( void * pointer ) } #undef hb_retptrGC -HB_EXPORT void hb_retptrGC( void * pointer ) +void hb_retptrGC( void * pointer ) { HB_TRACE(HB_TR_DEBUG, ("hb_retptrGC(%p)", pointer)); @@ -917,7 +917,7 @@ HB_EXPORT void hb_retptrGC( void * pointer ) } -HB_EXPORT int hb_storc( const char * szText, int iParam, ... ) +int hb_storc( const char * szText, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_storc(%s, %d, ...)", szText, iParam)); @@ -948,7 +948,7 @@ HB_EXPORT int hb_storc( const char * szText, int iParam, ... ) return 0; } -HB_EXPORT int hb_storclen( const char * szText, ULONG ulLen, int iParam, ... ) +int hb_storclen( const char * szText, ULONG ulLen, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_storclen(%s, %lu, %d, ...)", szText, ulLen, iParam)); @@ -979,7 +979,7 @@ HB_EXPORT int hb_storclen( const char * szText, ULONG ulLen, int iParam, ... ) return 0; } -HB_EXPORT int hb_storclen_buffer( char * szText, ULONG ulLen, int iParam, ... ) +int hb_storclen_buffer( char * szText, ULONG ulLen, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_storclen_buffer(%s, %lu, %d, ...)", szText, ulLen, iParam)); @@ -1012,7 +1012,7 @@ HB_EXPORT int hb_storclen_buffer( char * szText, ULONG ulLen, int iParam, ... ) /* szDate must have YYYYMMDD format */ -HB_EXPORT int hb_stords( const char * szDate, int iParam, ... ) +int hb_stords( const char * szDate, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_stords(%s, %d, ...)", szDate, iParam)); @@ -1043,7 +1043,7 @@ HB_EXPORT int hb_stords( const char * szDate, int iParam, ... ) return 0; } -HB_EXPORT int hb_storl( int iLogical, int iParam, ... ) +int hb_storl( int iLogical, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_storl(%d, %d, ...)", iLogical, iParam)); @@ -1074,7 +1074,7 @@ HB_EXPORT int hb_storl( int iLogical, int iParam, ... ) return 0; } -HB_EXPORT int hb_storni( int iValue, int iParam, ... ) +int hb_storni( int iValue, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_storni(%d, %d, ...)", iValue, iParam)); @@ -1105,7 +1105,7 @@ HB_EXPORT int hb_storni( int iValue, int iParam, ... ) return 0; } -HB_EXPORT int hb_stornl( long lValue, int iParam, ... ) +int hb_stornl( long lValue, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_stornl(%ld, %d, ...)", lValue, iParam)); @@ -1137,7 +1137,7 @@ HB_EXPORT int hb_stornl( long lValue, int iParam, ... ) } #ifndef HB_LONG_LONG_OFF -HB_EXPORT int hb_stornll( LONGLONG llValue, int iParam, ... ) +int hb_stornll( LONGLONG llValue, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_stornll(%" PFLL "d, %d, ...)", llValue, iParam)); @@ -1169,7 +1169,7 @@ HB_EXPORT int hb_stornll( LONGLONG llValue, int iParam, ... ) } #endif -HB_EXPORT int hb_stornint( HB_LONG lValue, int iParam, ... ) +int hb_stornint( HB_LONG lValue, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_stornint(%" PFHL "d, %d, ...)", lValue, iParam)); @@ -1200,7 +1200,7 @@ HB_EXPORT int hb_stornint( HB_LONG lValue, int iParam, ... ) return 0; } -HB_EXPORT int hb_stornd( double dNumber, int iParam, ... ) +int hb_stornd( double dNumber, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_stornd(%lf, %d, ...)", dNumber, iParam)); @@ -1231,7 +1231,7 @@ HB_EXPORT int hb_stornd( double dNumber, int iParam, ... ) return 0; } -HB_EXPORT int hb_storptr( void * pointer, int iParam, ... ) +int hb_storptr( void * pointer, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_storptr(%p, %d, ...)", pointer, iParam)); @@ -1262,7 +1262,7 @@ HB_EXPORT int hb_storptr( void * pointer, int iParam, ... ) return 0; } -HB_EXPORT int hb_storptrGC( void * pointer, int iParam, ... ) +int hb_storptrGC( void * pointer, int iParam, ... ) { HB_TRACE(HB_TR_DEBUG, ("hb_storptrGC(%p, %d, ...)", pointer, iParam)); @@ -1294,7 +1294,7 @@ HB_EXPORT int hb_storptrGC( void * pointer, int iParam, ... ) } #undef hb_pcount -HB_EXPORT int hb_pcount( void ) +int hb_pcount( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_pcount()")); diff --git a/harbour/source/vm/fm.c b/harbour/source/vm/fm.c index 105df72b0e..8fdd15fd8c 100644 --- a/harbour/source/vm/fm.c +++ b/harbour/source/vm/fm.c @@ -276,7 +276,7 @@ typedef void * PHB_MEMINFO; #endif -HB_EXPORT void hb_xsetfilename( char * szValue ) +void hb_xsetfilename( char * szValue ) { #ifdef HB_FM_STATISTICS hb_strncpy( s_szFileName, szValue, sizeof( s_szFileName ) - 1 ); @@ -285,7 +285,7 @@ HB_EXPORT void hb_xsetfilename( char * szValue ) #endif } -HB_EXPORT void hb_xsetinfo( char * szValue ) +void hb_xsetinfo( char * szValue ) { #ifdef HB_FM_STATISTICS hb_strncpy( s_szInfo, szValue, sizeof( s_szInfo ) - 1 ); @@ -295,7 +295,7 @@ HB_EXPORT void hb_xsetinfo( char * szValue ) } -HB_EXPORT void * hb_xalloc( ULONG ulSize ) /* allocates fixed memory, returns NULL on failure */ +void * hb_xalloc( ULONG ulSize ) /* allocates fixed memory, returns NULL on failure */ { PHB_MEMINFO pMem; @@ -365,7 +365,7 @@ HB_EXPORT void * hb_xalloc( ULONG ulSize ) /* allocates fixed memory, re return HB_MEM_PTR( pMem ); } -HB_EXPORT void * hb_xgrab( ULONG ulSize ) /* allocates fixed memory, exits on failure */ +void * hb_xgrab( ULONG ulSize ) /* allocates fixed memory, exits on failure */ { PHB_MEMINFO pMem; @@ -435,7 +435,7 @@ HB_EXPORT void * hb_xgrab( ULONG ulSize ) /* allocates fixed memory, exi return HB_MEM_PTR( pMem ); } -HB_EXPORT void * hb_xrealloc( void * pMem, ULONG ulSize ) /* reallocates memory */ +void * hb_xrealloc( void * pMem, ULONG ulSize ) /* reallocates memory */ { HB_TRACE_FM(HB_TR_DEBUG, ("hb_xrealloc(%p, %lu)", pMem, ulSize)); @@ -547,7 +547,7 @@ HB_EXPORT void * hb_xrealloc( void * pMem, ULONG ulSize ) /* reallocates m return HB_MEM_PTR( pMem ); } -HB_EXPORT void hb_xfree( void * pMem ) /* frees fixed memory */ +void hb_xfree( void * pMem ) /* frees fixed memory */ { HB_TRACE_FM(HB_TR_DEBUG, ("hb_xfree(%p)", pMem)); @@ -688,7 +688,7 @@ void * hb_xRefResize( void * pMem, ULONG ulSave, ULONG ulSize ) /* NOTE: Debug function, it will always return 0 when HB_FM_STATISTICS is not defined, don't use it for final code [vszakats] */ -HB_EXPORT ULONG hb_xsize( void * pMem ) /* returns the size of an allocated memory block */ +ULONG hb_xsize( void * pMem ) /* returns the size of an allocated memory block */ { HB_TRACE(HB_TR_DEBUG, ("hb_xsize(%p)", pMem)); @@ -701,7 +701,7 @@ HB_EXPORT ULONG hb_xsize( void * pMem ) /* returns the size of an allocated mem #endif } -HB_EXPORT void hb_xinit( void ) /* Initialize fixed memory subsystem */ +void hb_xinit( void ) /* Initialize fixed memory subsystem */ { HB_TRACE(HB_TR_DEBUG, ("hb_xinit()")); } @@ -750,7 +750,7 @@ static char * hb_mem2str( char * membuffer, void * pMem, UINT uiSize ) } #define HB_MAX_MEM2STR_BLOCK 256 -HB_EXPORT void hb_xexit( void ) /* Deinitialize fixed memory subsystem */ +void hb_xexit( void ) /* Deinitialize fixed memory subsystem */ { HB_TRACE(HB_TR_DEBUG, ("hb_xexit()")); @@ -825,7 +825,7 @@ HB_EXPORT void hb_xexit( void ) /* Deinitialize fixed memory subsystem */ #else -HB_EXPORT void hb_xexit( void ) /* Deinitialize fixed memory subsystem */ +void hb_xexit( void ) /* Deinitialize fixed memory subsystem */ { HB_TRACE(HB_TR_DEBUG, ("hb_xexit()")); } diff --git a/harbour/source/vm/hashes.c b/harbour/source/vm/hashes.c index 5322157a07..b4636f7e5a 100644 --- a/harbour/source/vm/hashes.c +++ b/harbour/source/vm/hashes.c @@ -384,7 +384,7 @@ static void hb_hashDelPair( PHB_BASEHASH pBaseHash, ULONG ulPos ) } } -HB_EXPORT PHB_ITEM hb_hashNew( PHB_ITEM pItem ) +PHB_ITEM hb_hashNew( PHB_ITEM pItem ) { PHB_BASEHASH pBaseHash; @@ -408,7 +408,7 @@ HB_EXPORT PHB_ITEM hb_hashNew( PHB_ITEM pItem ) return pItem; } -HB_EXPORT ULONG hb_hashLen( PHB_ITEM pHash ) +ULONG hb_hashLen( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashLen(%p)", pHash)); @@ -418,7 +418,7 @@ HB_EXPORT ULONG hb_hashLen( PHB_ITEM pHash ) return 0; } -HB_EXPORT void hb_hashPreallocate( PHB_ITEM pHash, ULONG ulNewSize ) +void hb_hashPreallocate( PHB_ITEM pHash, ULONG ulNewSize ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashPreallocate(%p,%lu)", pHash, ulNewSize)); @@ -426,7 +426,7 @@ HB_EXPORT void hb_hashPreallocate( PHB_ITEM pHash, ULONG ulNewSize ) hb_hashResize( pHash->item.asHash.value, ulNewSize ); } -HB_EXPORT BOOL hb_hashAllocNewPair( PHB_ITEM pHash, PHB_ITEM * pKeyPtr, PHB_ITEM * pValPtr ) +BOOL hb_hashAllocNewPair( PHB_ITEM pHash, PHB_ITEM * pKeyPtr, PHB_ITEM * pValPtr ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashAllocNewPair(%p,%p,%p)", pHash, pKeyPtr, pValPtr)); @@ -439,7 +439,7 @@ HB_EXPORT BOOL hb_hashAllocNewPair( PHB_ITEM pHash, PHB_ITEM * pKeyPtr, PHB_ITEM return FALSE; } -HB_EXPORT void hb_hashSort( PHB_ITEM pHash ) +void hb_hashSort( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashSort(%p)", pHash)); @@ -450,7 +450,7 @@ HB_EXPORT void hb_hashSort( PHB_ITEM pHash ) } } -HB_EXPORT PHB_ITEM hb_hashGetItemPtr( PHB_ITEM pHash, PHB_ITEM pKey, int iFlags ) +PHB_ITEM hb_hashGetItemPtr( PHB_ITEM pHash, PHB_ITEM pKey, int iFlags ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetItemPtr(%p,%p,%d)", pHash, pKey, iFlags)); @@ -465,7 +465,7 @@ HB_EXPORT PHB_ITEM hb_hashGetItemPtr( PHB_ITEM pHash, PHB_ITEM pKey, int iFlags return NULL; } -HB_EXPORT PHB_ITEM hb_hashGetItemRefPtr( PHB_ITEM pHash, PHB_ITEM pKey ) +PHB_ITEM hb_hashGetItemRefPtr( PHB_ITEM pHash, PHB_ITEM pKey ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetItemRefPtr(%p,%p)", pHash, pKey)); @@ -485,7 +485,7 @@ HB_EXPORT PHB_ITEM hb_hashGetItemRefPtr( PHB_ITEM pHash, PHB_ITEM pKey ) return NULL; } -HB_EXPORT BOOL hb_hashScan( PHB_ITEM pHash, PHB_ITEM pKey, ULONG * pulPos ) +BOOL hb_hashScan( PHB_ITEM pHash, PHB_ITEM pKey, ULONG * pulPos ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashScan(%p,%p,%p)", pHash, pKey, pulPos)); @@ -540,7 +540,7 @@ HB_EXPORT BOOL hb_hashScan( PHB_ITEM pHash, PHB_ITEM pKey, ULONG * pulPos ) return FALSE; } -HB_EXPORT BOOL hb_hashClear( PHB_ITEM pHash ) +BOOL hb_hashClear( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashClear(%p)", pHash)); @@ -573,7 +573,7 @@ HB_EXPORT BOOL hb_hashClear( PHB_ITEM pHash ) return FALSE; } -HB_EXPORT BOOL hb_hashDel( PHB_ITEM pHash, PHB_ITEM pKey ) +BOOL hb_hashDel( PHB_ITEM pHash, PHB_ITEM pKey ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashDel(%p,%p)", pHash, pKey)); @@ -592,7 +592,7 @@ HB_EXPORT BOOL hb_hashDel( PHB_ITEM pHash, PHB_ITEM pKey ) return FALSE; } -HB_EXPORT BOOL hb_hashRemove( PHB_ITEM pHash, PHB_ITEM pItem ) +BOOL hb_hashRemove( PHB_ITEM pHash, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashRemove(%p,%p)", pHash, pItem)); @@ -627,7 +627,7 @@ HB_EXPORT BOOL hb_hashRemove( PHB_ITEM pHash, PHB_ITEM pItem ) return FALSE; } -HB_EXPORT BOOL hb_hashAdd( PHB_ITEM pHash, PHB_ITEM pKey, PHB_ITEM pValue ) +BOOL hb_hashAdd( PHB_ITEM pHash, PHB_ITEM pKey, PHB_ITEM pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashAdd(%p,%p,%p)", pHash, pKey, pValue)); @@ -649,7 +649,7 @@ HB_EXPORT BOOL hb_hashAdd( PHB_ITEM pHash, PHB_ITEM pKey, PHB_ITEM pValue ) return FALSE; } -HB_EXPORT BOOL hb_hashAddNew( PHB_ITEM pHash, PHB_ITEM pKey, PHB_ITEM pValue ) +BOOL hb_hashAddNew( PHB_ITEM pHash, PHB_ITEM pKey, PHB_ITEM pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashAddNew(%p,%p,%p)", pHash, pKey, pValue)); @@ -659,7 +659,7 @@ HB_EXPORT BOOL hb_hashAddNew( PHB_ITEM pHash, PHB_ITEM pKey, PHB_ITEM pValue ) return FALSE; } -HB_EXPORT PHB_ITEM hb_hashGetKeyAt( PHB_ITEM pHash, ULONG ulPos ) +PHB_ITEM hb_hashGetKeyAt( PHB_ITEM pHash, ULONG ulPos ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetKeyAt(%p,%lu)", pHash, ulPos)); @@ -669,7 +669,7 @@ HB_EXPORT PHB_ITEM hb_hashGetKeyAt( PHB_ITEM pHash, ULONG ulPos ) return NULL; } -HB_EXPORT PHB_ITEM hb_hashGetValueAt( PHB_ITEM pHash, ULONG ulPos ) +PHB_ITEM hb_hashGetValueAt( PHB_ITEM pHash, ULONG ulPos ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetValueAt(%p,%lu)", pHash, ulPos)); @@ -681,7 +681,7 @@ HB_EXPORT PHB_ITEM hb_hashGetValueAt( PHB_ITEM pHash, ULONG ulPos ) return NULL; } -HB_EXPORT BOOL hb_hashDelAt( PHB_ITEM pHash, ULONG ulPos ) +BOOL hb_hashDelAt( PHB_ITEM pHash, ULONG ulPos ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashDelAt(%p,%lu)", pHash, ulPos)); @@ -695,7 +695,7 @@ HB_EXPORT BOOL hb_hashDelAt( PHB_ITEM pHash, ULONG ulPos ) } /* retrives the hash unique ID */ -HB_EXPORT void * hb_hashId( PHB_ITEM pHash ) +void * hb_hashId( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashId(%p)", pHash)); @@ -729,7 +729,7 @@ void hb_hashCloneBody( PHB_ITEM pHash, PHB_ITEM pDest, PHB_NESTED_CLONED pCloned } } -HB_EXPORT PHB_ITEM hb_hashClone( PHB_ITEM pHash ) +PHB_ITEM hb_hashClone( PHB_ITEM pHash ) { PHB_ITEM pDest; @@ -759,7 +759,7 @@ HB_EXPORT PHB_ITEM hb_hashClone( PHB_ITEM pHash ) return pDest; } -HB_EXPORT void hb_hashJoin( PHB_ITEM pDest, PHB_ITEM pSource, int iType ) +void hb_hashJoin( PHB_ITEM pDest, PHB_ITEM pSource, int iType ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashJoin(%p,%p,%d)", pDest, pSource, iType)); @@ -819,7 +819,7 @@ HB_EXPORT void hb_hashJoin( PHB_ITEM pDest, PHB_ITEM pSource, int iType ) } } -HB_EXPORT PHB_ITEM hb_hashGetKeys( PHB_ITEM pHash ) +PHB_ITEM hb_hashGetKeys( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetKeys(%p)", pHash)); @@ -841,7 +841,7 @@ HB_EXPORT PHB_ITEM hb_hashGetKeys( PHB_ITEM pHash ) return NULL; } -HB_EXPORT PHB_ITEM hb_hashGetValues( PHB_ITEM pHash ) +PHB_ITEM hb_hashGetValues( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetValues(%p)", pHash)); @@ -863,7 +863,7 @@ HB_EXPORT PHB_ITEM hb_hashGetValues( PHB_ITEM pHash ) return NULL; } -HB_EXPORT void hb_hashSetDefault( PHB_ITEM pHash, PHB_ITEM pValue ) +void hb_hashSetDefault( PHB_ITEM pHash, PHB_ITEM pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashSetDefault(%p,%p)", pHash, pValue)); @@ -881,7 +881,7 @@ HB_EXPORT void hb_hashSetDefault( PHB_ITEM pHash, PHB_ITEM pValue ) } } -HB_EXPORT PHB_ITEM hb_hashGetDefault( PHB_ITEM pHash ) +PHB_ITEM hb_hashGetDefault( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetDefault(%p)", pHash)); @@ -891,7 +891,7 @@ HB_EXPORT PHB_ITEM hb_hashGetDefault( PHB_ITEM pHash ) return NULL; } -HB_EXPORT void hb_hashSetFlags( PHB_ITEM pHash, int iFlags ) +void hb_hashSetFlags( PHB_ITEM pHash, int iFlags ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashSetFlags(%p,%d)", pHash, iFlags)); @@ -899,7 +899,7 @@ HB_EXPORT void hb_hashSetFlags( PHB_ITEM pHash, int iFlags ) pHash->item.asHash.value->iFlags |= iFlags; } -HB_EXPORT void hb_hashClearFlags( PHB_ITEM pHash, int iFlags ) +void hb_hashClearFlags( PHB_ITEM pHash, int iFlags ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashClearFlags(%p,%d)", pHash, iFlags)); @@ -907,7 +907,7 @@ HB_EXPORT void hb_hashClearFlags( PHB_ITEM pHash, int iFlags ) pHash->item.asHash.value->iFlags &= ~iFlags; } -HB_EXPORT int hb_hashGetFlags( PHB_ITEM pHash ) +int hb_hashGetFlags( PHB_ITEM pHash ) { HB_TRACE(HB_TR_DEBUG, ("hb_hashGetFlags(%p)", pHash)); diff --git a/harbour/source/vm/hvm.c b/harbour/source/vm/hvm.c index dec9d6bbd8..94b8e2f0a1 100644 --- a/harbour/source/vm/hvm.c +++ b/harbour/source/vm/hvm.c @@ -251,7 +251,7 @@ static BOOL hb_bTracePrgCalls = FALSE; /* prg tracing is off */ # define HB_TRACE_PRG( _TRMSG_ ) #endif -HB_EXPORT const char * hb_vm_pszLinkedMain = NULL; /* name of startup function set by linker */ +const char * hb_vm_pszLinkedMain = NULL; /* name of startup function set by linker */ /* virtual machine state */ @@ -294,7 +294,7 @@ static int s_VMCancelKeyEx = HB_K_ALT_C; static PHB_FUNC_LIST s_InitFunctions = NULL; static PHB_FUNC_LIST s_ExitFunctions = NULL; -HB_EXPORT void hb_vmAtInit( HB_INIT_FUNC pFunc, void * cargo ) +void hb_vmAtInit( HB_INIT_FUNC pFunc, void * cargo ) { PHB_FUNC_LIST pLst = ( PHB_FUNC_LIST ) hb_xgrab( sizeof( HB_FUNC_LIST ) ); @@ -306,7 +306,7 @@ HB_EXPORT void hb_vmAtInit( HB_INIT_FUNC pFunc, void * cargo ) HB_ATINIT_UNLOCK } -HB_EXPORT void hb_vmAtExit( HB_INIT_FUNC pFunc, void * cargo ) +void hb_vmAtExit( HB_INIT_FUNC pFunc, void * cargo ) { PHB_FUNC_LIST pLst = ( PHB_FUNC_LIST ) hb_xgrab( sizeof( HB_FUNC_LIST ) ); @@ -703,7 +703,7 @@ static void hb_vmStackRelease( void ) HB_VM_UNLOCK } -HB_EXPORT BOOL hb_vmThreadRegister( void * Cargo ) +BOOL hb_vmThreadRegister( void * Cargo ) { HB_TRACE(HB_TR_DEBUG, ("hb_vmThreadRegister(%p)", Cargo)); @@ -716,7 +716,7 @@ HB_EXPORT BOOL hb_vmThreadRegister( void * Cargo ) return TRUE; } -HB_EXPORT void hb_vmThreadRelease( void * Cargo ) +void hb_vmThreadRelease( void * Cargo ) { PHB_ITEM pThItm; @@ -735,7 +735,7 @@ HB_EXPORT void hb_vmThreadRelease( void * Cargo ) } /* thread entry point */ -HB_EXPORT void hb_vmThreadInit( void * Cargo ) +void hb_vmThreadInit( void * Cargo ) { PHB_THREADSTATE pState; @@ -786,7 +786,7 @@ HB_EXPORT void hb_vmThreadInit( void * Cargo ) } /* thread leave point */ -HB_EXPORT void hb_vmThreadQuit( void ) +void hb_vmThreadQuit( void ) { HB_STACK_TLS_PRELOAD PHB_THREADSTATE pState; @@ -822,7 +822,7 @@ HB_EXPORT void hb_vmThreadQuit( void ) } /* send QUIT request to given thread */ -HB_EXPORT void hb_vmThreadQuitRequest( void * Cargo ) +void hb_vmThreadQuitRequest( void * Cargo ) { PHB_THREADSTATE pState; @@ -842,7 +842,7 @@ HB_EXPORT void hb_vmThreadQuitRequest( void * Cargo ) /* application entry point */ -HB_EXPORT void hb_vmInit( BOOL bStartMainProc ) +void hb_vmInit( BOOL bStartMainProc ) { HB_TRACE(HB_TR_DEBUG, ("hb_vmInit()")); @@ -1001,7 +1001,7 @@ HB_EXPORT void hb_vmInit( BOOL bStartMainProc ) } } -HB_EXPORT int hb_vmQuit( void ) +int hb_vmQuit( void ) { HB_STACK_TLS_PRELOAD @@ -1086,7 +1086,7 @@ HB_EXPORT int hb_vmQuit( void ) return s_nErrorLevel; } -HB_EXPORT void hb_vmExecute( const BYTE * pCode, PHB_SYMB pSymbols ) +void hb_vmExecute( const BYTE * pCode, PHB_SYMB pSymbols ) { HB_STACK_TLS_PRELOAD LONG w = 0; @@ -5331,7 +5331,7 @@ static void hb_vmSwapAlias( void ) /* Execution */ /* ------------------------------- */ -HB_EXPORT void hb_vmDo( USHORT uiParams ) +void hb_vmDo( USHORT uiParams ) { HB_STACK_TLS_PRELOAD HB_STACK_STATE sStackState; @@ -5417,7 +5417,7 @@ HB_EXPORT void hb_vmDo( USHORT uiParams ) hb_stackOldFrame( &sStackState ); } -HB_EXPORT void hb_vmSend( USHORT uiParams ) +void hb_vmSend( USHORT uiParams ) { HB_STACK_TLS_PRELOAD HB_STACK_STATE sStackState; @@ -5571,7 +5571,7 @@ HB_ITEM_PTR hb_vmEvalBlockV( HB_ITEM_PTR pBlock, ULONG ulArgCount, ... ) /* Evaluates a passed codeblock item or macro pointer item */ -HB_EXPORT PHB_ITEM hb_vmEvalBlockOrMacro( PHB_ITEM pItem ) +PHB_ITEM hb_vmEvalBlockOrMacro( PHB_ITEM pItem ) { HB_STACK_TLS_PRELOAD @@ -5602,7 +5602,7 @@ HB_EXPORT PHB_ITEM hb_vmEvalBlockOrMacro( PHB_ITEM pItem ) /* * destroy codeblock or macro in given item */ -HB_EXPORT void hb_vmDestroyBlockOrMacro( PHB_ITEM pItem ) +void hb_vmDestroyBlockOrMacro( PHB_ITEM pItem ) { if( HB_IS_POINTER( pItem ) ) { @@ -6031,7 +6031,7 @@ static void hb_vmRetValue( void ) /* Push */ /* ------------------------------- */ -HB_EXPORT void hb_vmPush( PHB_ITEM pItem ) +void hb_vmPush( PHB_ITEM pItem ) { HB_STACK_TLS_PRELOAD @@ -6040,7 +6040,7 @@ HB_EXPORT void hb_vmPush( PHB_ITEM pItem ) hb_itemCopy( hb_stackAllocItem(), pItem ); } -HB_EXPORT void hb_vmPushState( void ) +void hb_vmPushState( void ) { HB_STACK_TLS_PRELOAD @@ -6049,7 +6049,7 @@ HB_EXPORT void hb_vmPushState( void ) hb_stackPushReturn(); } -HB_EXPORT void hb_vmPushNil( void ) +void hb_vmPushNil( void ) { HB_STACK_TLS_PRELOAD @@ -6058,7 +6058,7 @@ HB_EXPORT void hb_vmPushNil( void ) hb_stackAllocItem()->type = HB_IT_NIL; } -HB_EXPORT void hb_vmPushLogical( BOOL bValue ) +void hb_vmPushLogical( BOOL bValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6070,7 +6070,7 @@ HB_EXPORT void hb_vmPushLogical( BOOL bValue ) } /* not used by HVM code */ -HB_EXPORT void hb_vmPushNumber( double dNumber, int iDec ) +void hb_vmPushNumber( double dNumber, int iDec ) { HB_STACK_TLS_PRELOAD @@ -6109,7 +6109,7 @@ static int hb_vmCalcIntWidth( HB_LONG lNumber ) return iWidth; } -HB_EXPORT void hb_vmPushInteger( int iNumber ) +void hb_vmPushInteger( int iNumber ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6148,7 +6148,7 @@ static void hb_vmPushLongConst( long lNumber ) #endif -HB_EXPORT void hb_vmPushLong( long lNumber ) +void hb_vmPushLong( long lNumber ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6192,7 +6192,7 @@ static void hb_vmPushLongLongConst( LONGLONG llNumber ) } #endif -HB_EXPORT void hb_vmPushNumInt( HB_LONG lNumber ) +void hb_vmPushNumInt( HB_LONG lNumber ) { if( HB_LIM_INT( lNumber ) ) hb_vmPushInteger( ( int ) lNumber ); @@ -6200,7 +6200,7 @@ HB_EXPORT void hb_vmPushNumInt( HB_LONG lNumber ) hb_vmPushHBLong( lNumber ); } -HB_EXPORT void hb_vmPushDouble( double dNumber, int iDec ) +void hb_vmPushDouble( double dNumber, int iDec ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6237,7 +6237,7 @@ static void hb_vmPushDoubleConst( double dNumber, int iWidth, int iDec ) pItem->item.asDouble.length = iWidth; } -HB_EXPORT void hb_vmPushDate( long lDate ) +void hb_vmPushDate( long lDate ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6248,7 +6248,7 @@ HB_EXPORT void hb_vmPushDate( long lDate ) pItem->item.asDate.value = lDate; } -HB_EXPORT void hb_vmPushPointer( void * pPointer ) +void hb_vmPushPointer( void * pPointer ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6261,7 +6261,7 @@ HB_EXPORT void hb_vmPushPointer( void * pPointer ) pItem->item.asPointer.single = FALSE; } -HB_EXPORT void hb_vmPushString( const char * szText, ULONG length ) +void hb_vmPushString( const char * szText, ULONG length ) { HB_STACK_TLS_PRELOAD @@ -6270,7 +6270,7 @@ HB_EXPORT void hb_vmPushString( const char * szText, ULONG length ) hb_itemPutCL( hb_stackAllocItem(), szText, length ); } -HB_EXPORT void hb_vmPushStringPcode( const char * szText, ULONG length ) +void hb_vmPushStringPcode( const char * szText, ULONG length ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6283,7 +6283,7 @@ HB_EXPORT void hb_vmPushStringPcode( const char * szText, ULONG length ) pItem->item.asString.value = ( char * ) szText; } -HB_EXPORT void hb_vmPushSymbol( PHB_SYMB pSym ) +void hb_vmPushSymbol( PHB_SYMB pSym ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6295,7 +6295,7 @@ HB_EXPORT void hb_vmPushSymbol( PHB_SYMB pSym ) pItem->item.asSymbol.stackstate = NULL; } -HB_EXPORT void hb_vmPushDynSym( PHB_DYNS pDynSym ) +void hb_vmPushDynSym( PHB_DYNS pDynSym ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6307,7 +6307,7 @@ HB_EXPORT void hb_vmPushDynSym( PHB_DYNS pDynSym ) pItem->item.asSymbol.stackstate = NULL; } -HB_EXPORT void hb_vmPushEvalSym( void ) +void hb_vmPushEvalSym( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem = hb_stackAllocItem(); @@ -6680,7 +6680,7 @@ static void hb_vmSwap( BYTE bCount ) /* Pop */ /* ------------------------------- */ -HB_EXPORT void hb_vmPopState( void ) +void hb_vmPopState( void ) { HB_STACK_TLS_PRELOAD @@ -7326,7 +7326,7 @@ static void hb_vmVerifyPCodeVersion( const char * szModuleName, USHORT uiPCodeVe /* * module symbols initialization with extended information */ -HB_EXPORT PHB_SYMB hb_vmProcessSymbolsEx( PHB_SYMB pSymbols, USHORT uiModuleSymbols, +PHB_SYMB hb_vmProcessSymbolsEx( PHB_SYMB pSymbols, USHORT uiModuleSymbols, const char * szModuleName, ULONG ulID, USHORT uiPCodeVer ) { @@ -7337,7 +7337,7 @@ HB_EXPORT PHB_SYMB hb_vmProcessSymbolsEx( PHB_SYMB pSymbols, USHORT uiModuleSymb s_fCloneSym, s_fCloneSym )->pModuleSymbols; } -HB_EXPORT PHB_SYMB hb_vmProcessDynLibSymbols( PHB_SYMB pSymbols, USHORT uiModuleSymbols, +PHB_SYMB hb_vmProcessDynLibSymbols( PHB_SYMB pSymbols, USHORT uiModuleSymbols, const char * szModuleName, ULONG ulID, USHORT uiPCodeVer ) { @@ -7351,7 +7351,7 @@ HB_EXPORT PHB_SYMB hb_vmProcessDynLibSymbols( PHB_SYMB pSymbols, USHORT uiModule /* * old module symbols initialization - do not use it. */ -HB_EXPORT PHB_SYMB hb_vmProcessSymbols( PHB_SYMB pSymbols, USHORT uiSymbols ) +PHB_SYMB hb_vmProcessSymbols( PHB_SYMB pSymbols, USHORT uiSymbols ) { HB_TRACE(HB_TR_DEBUG, ("hb_vmProcessSymbols(%p,%hu)", pSymbols, uiSymbols)); @@ -7362,7 +7362,7 @@ HB_EXPORT PHB_SYMB hb_vmProcessSymbols( PHB_SYMB pSymbols, USHORT uiSymbols ) /* * old function - do not use it. */ -HB_EXPORT PHB_SYMB hb_vmProcessDllSymbols( PHB_SYMB pSymbols, USHORT uiModuleSymbols ) +PHB_SYMB hb_vmProcessDllSymbols( PHB_SYMB pSymbols, USHORT uiModuleSymbols ) { HB_TRACE(HB_TR_DEBUG, ("hb_vmProcessDllSymbols(%p,%hu)", pSymbols, uiModuleSymbols)); @@ -7557,7 +7557,7 @@ static void hb_vmItemRefDummy( void * value ) /* * push extended item reference */ -HB_EXPORT void hb_vmPushItemRef( PHB_ITEM pItem ) +void hb_vmPushItemRef( PHB_ITEM pItem ) { static const HB_EXTREF s_ItmExtRef = { hb_vmItemRefRead, @@ -8032,7 +8032,7 @@ void hb_vmSetLang( PHB_LANG pLang ) ( HB_ENDPROC_REQUESTED | HB_BREAK_REQUESTED | HB_QUIT_REQUESTED ) ) != 0; #endif -HB_EXPORT void hb_xvmExitProc( void ) +void hb_xvmExitProc( void ) { HB_STACK_TLS_PRELOAD @@ -8040,7 +8040,7 @@ HB_EXPORT void hb_xvmExitProc( void ) hb_stackSetActionRequest( 0 ); } -HB_EXPORT void hb_xvmEndProc( void ) +void hb_xvmEndProc( void ) { HB_STACK_TLS_PRELOAD @@ -8048,7 +8048,7 @@ HB_EXPORT void hb_xvmEndProc( void ) hb_stackSetActionRequest( HB_ENDPROC_REQUESTED ); } -HB_EXPORT void hb_xvmSeqBegin( void ) +void hb_xvmSeqBegin( void ) { HB_STACK_TLS_PRELOAD @@ -8083,7 +8083,7 @@ HB_EXPORT void hb_xvmSeqBegin( void ) hb_stackSetRecoverBase( hb_stackTopOffset() ); } -HB_EXPORT BOOL hb_xvmSeqEnd( void ) +BOOL hb_xvmSeqEnd( void ) { HB_STACK_TLS_PRELOAD @@ -8115,7 +8115,7 @@ HB_EXPORT BOOL hb_xvmSeqEnd( void ) return FALSE; } -HB_EXPORT BOOL hb_xvmSeqEndTest( void ) +BOOL hb_xvmSeqEndTest( void ) { HB_STACK_TLS_PRELOAD @@ -8146,7 +8146,7 @@ HB_EXPORT BOOL hb_xvmSeqEndTest( void ) return FALSE; } -HB_EXPORT BOOL hb_xvmSeqRecover( void ) +BOOL hb_xvmSeqRecover( void ) { HB_STACK_TLS_PRELOAD @@ -8175,7 +8175,7 @@ HB_EXPORT BOOL hb_xvmSeqRecover( void ) return FALSE; } -HB_EXPORT void hb_xvmSeqAlways( void ) +void hb_xvmSeqAlways( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -8203,7 +8203,7 @@ HB_EXPORT void hb_xvmSeqAlways( void ) hb_stackSetRecoverBase( hb_stackTopOffset() ); } -HB_EXPORT BOOL hb_xvmAlwaysBegin( void ) +BOOL hb_xvmAlwaysBegin( void ) { HB_STACK_TLS_PRELOAD @@ -8221,7 +8221,7 @@ HB_EXPORT BOOL hb_xvmAlwaysBegin( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmAlwaysEnd( void ) +BOOL hb_xvmAlwaysEnd( void ) { HB_STACK_TLS_PRELOAD USHORT uiPrevAction, uiCurrAction; @@ -8255,7 +8255,7 @@ HB_EXPORT BOOL hb_xvmAlwaysEnd( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmSeqBlock( void ) +BOOL hb_xvmSeqBlock( void ) { HB_STACK_TLS_PRELOAD @@ -8266,7 +8266,7 @@ HB_EXPORT BOOL hb_xvmSeqBlock( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmEnumStart( BYTE nVars, BYTE nDescend ) +BOOL hb_xvmEnumStart( BYTE nVars, BYTE nDescend ) { HB_STACK_TLS_PRELOAD @@ -8277,7 +8277,7 @@ HB_EXPORT BOOL hb_xvmEnumStart( BYTE nVars, BYTE nDescend ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmEnumNext( void ) +BOOL hb_xvmEnumNext( void ) { HB_STACK_TLS_PRELOAD @@ -8288,7 +8288,7 @@ HB_EXPORT BOOL hb_xvmEnumNext( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmEnumPrev( void ) +BOOL hb_xvmEnumPrev( void ) { HB_STACK_TLS_PRELOAD @@ -8299,14 +8299,14 @@ HB_EXPORT BOOL hb_xvmEnumPrev( void ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmEnumEnd( void ) +void hb_xvmEnumEnd( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmEnumEnd()")); hb_vmEnumEnd(); } -HB_EXPORT void hb_xvmSetLine( USHORT uiLine ) +void hb_xvmSetLine( USHORT uiLine ) { HB_STACK_TLS_PRELOAD @@ -8319,28 +8319,28 @@ HB_EXPORT void hb_xvmSetLine( USHORT uiLine ) #endif } -HB_EXPORT void hb_xvmFrame( int iLocals, int iParams ) +void hb_xvmFrame( int iLocals, int iParams ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmFrame(%d, %d)", iLocals, iParams)); hb_vmFrame( ( USHORT ) iLocals, ( BYTE ) iParams ); } -HB_EXPORT void hb_xvmVFrame( int iLocals, int iParams ) +void hb_xvmVFrame( int iLocals, int iParams ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmVFrame(%d, %d)", iLocals, iParams)); hb_vmVFrame( ( USHORT ) iLocals, ( BYTE ) iParams ); } -HB_EXPORT void hb_xvmSFrame( PHB_SYMB pSymbol ) +void hb_xvmSFrame( PHB_SYMB pSymbol ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmSFrame(%p)", pSymbol)); hb_vmSFrame( pSymbol ); } -HB_EXPORT BOOL hb_xvmDo( USHORT uiParams ) +BOOL hb_xvmDo( USHORT uiParams ) { HB_STACK_TLS_PRELOAD @@ -8351,7 +8351,7 @@ HB_EXPORT BOOL hb_xvmDo( USHORT uiParams ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmFunction( USHORT uiParams ) +BOOL hb_xvmFunction( USHORT uiParams ) { HB_STACK_TLS_PRELOAD @@ -8364,7 +8364,7 @@ HB_EXPORT BOOL hb_xvmFunction( USHORT uiParams ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmSend( USHORT uiParams ) +BOOL hb_xvmSend( USHORT uiParams ) { HB_STACK_TLS_PRELOAD @@ -8377,7 +8377,7 @@ HB_EXPORT BOOL hb_xvmSend( USHORT uiParams ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPushObjectVarRef( void ) +BOOL hb_xvmPushObjectVarRef( void ) { HB_STACK_TLS_PRELOAD @@ -8388,7 +8388,7 @@ HB_EXPORT BOOL hb_xvmPushObjectVarRef( void ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmRetValue( void ) +void hb_xvmRetValue( void ) { HB_STACK_TLS_PRELOAD @@ -8398,21 +8398,21 @@ HB_EXPORT void hb_xvmRetValue( void ) hb_stackReturnItem()->type &= ~HB_IT_MEMOFLAG; } -HB_EXPORT void hb_xvmStatics( PHB_SYMB pSymbol, USHORT uiStatics ) +void hb_xvmStatics( PHB_SYMB pSymbol, USHORT uiStatics ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmStatics(%p,%hu)", pSymbol, uiStatics)); hb_vmStatics( pSymbol, uiStatics ); } -HB_EXPORT void hb_xvmThreadStatics( USHORT uiStatics, const BYTE * statics ) +void hb_xvmThreadStatics( USHORT uiStatics, const BYTE * statics ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmThreadStatics(%hu,%p)", uiStatics, statics)); hb_vmInitThreadStatics( uiStatics, statics ); } -HB_EXPORT void hb_xvmParameter( PHB_SYMB pSymbol, int iParams ) +void hb_xvmParameter( PHB_SYMB pSymbol, int iParams ) { HB_STACK_TLS_PRELOAD @@ -8421,21 +8421,21 @@ HB_EXPORT void hb_xvmParameter( PHB_SYMB pSymbol, int iParams ) hb_memvarNewParameter( pSymbol, hb_stackItemFromBase( iParams ) ); } -HB_EXPORT void hb_xvmPushLocal( SHORT iLocal ) +void hb_xvmPushLocal( SHORT iLocal ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushLocal(%hd)", iLocal)); hb_vmPushLocal( iLocal ); } -HB_EXPORT void hb_xvmPushLocalByRef( SHORT iLocal ) +void hb_xvmPushLocalByRef( SHORT iLocal ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushLocalByRef(%hd)", iLocal)); hb_vmPushLocalByRef( iLocal ); } -HB_EXPORT void hb_xvmPopLocal( SHORT iLocal ) +void hb_xvmPopLocal( SHORT iLocal ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPopLocal(%hd)", iLocal)); @@ -8462,7 +8462,7 @@ static PHB_ITEM hb_xvmLocalPtr( int iLocal ) } } -HB_EXPORT void hb_xvmCopyLocals( int iDest, int iSource ) +void hb_xvmCopyLocals( int iDest, int iSource ) { PHB_ITEM pDest; @@ -8473,28 +8473,28 @@ HB_EXPORT void hb_xvmCopyLocals( int iDest, int iSource ) HB_IS_BYREF( pDest ) ? hb_itemUnRef( pDest ) : pDest ); } -HB_EXPORT void hb_xvmPushStatic( USHORT uiStatic ) +void hb_xvmPushStatic( USHORT uiStatic ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushStatic(%hu)", uiStatic)); hb_vmPushStatic( uiStatic ); } -HB_EXPORT void hb_xvmPushStaticByRef( USHORT uiStatic ) +void hb_xvmPushStaticByRef( USHORT uiStatic ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushStaticByRef(%hu)", uiStatic)); hb_vmPushStaticByRef( uiStatic ); } -HB_EXPORT void hb_xvmPopStatic( USHORT uiStatic ) +void hb_xvmPopStatic( USHORT uiStatic ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPopStatic(%hu)", uiStatic)); hb_vmPopStatic( uiStatic ); } -HB_EXPORT BOOL hb_xvmPushVariable( PHB_SYMB pSymbol ) +BOOL hb_xvmPushVariable( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8505,7 +8505,7 @@ HB_EXPORT BOOL hb_xvmPushVariable( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPopVariable( PHB_SYMB pSymbol ) +BOOL hb_xvmPopVariable( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8523,21 +8523,21 @@ HB_EXPORT BOOL hb_xvmPopVariable( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmPushBlockShort( const BYTE * pCode, PHB_SYMB pSymbols ) +void hb_xvmPushBlockShort( const BYTE * pCode, PHB_SYMB pSymbols ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushBlockShort(%p, %p)", pCode, pSymbols)); hb_vmPushBlockShort( pCode, pSymbols, FALSE ); } -HB_EXPORT void hb_xvmPushBlock( const BYTE * pCode, PHB_SYMB pSymbols ) +void hb_xvmPushBlock( const BYTE * pCode, PHB_SYMB pSymbols ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushBlock(%p, %p)", pCode, pSymbols)); hb_vmPushBlock( pCode, pSymbols, FALSE ); } -HB_EXPORT void hb_xvmPushSelf( void ) +void hb_xvmPushSelf( void ) { HB_STACK_TLS_PRELOAD @@ -8546,7 +8546,7 @@ HB_EXPORT void hb_xvmPushSelf( void ) hb_vmPush( hb_stackSelfItem() ); } -HB_EXPORT void hb_xvmPushFuncSymbol( PHB_SYMB pSym ) +void hb_xvmPushFuncSymbol( PHB_SYMB pSym ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -8560,7 +8560,7 @@ HB_EXPORT void hb_xvmPushFuncSymbol( PHB_SYMB pSym ) hb_stackAllocItem()->type = HB_IT_NIL; } -HB_EXPORT BOOL hb_xvmPopLogical( BOOL * pfValue ) +BOOL hb_xvmPopLogical( BOOL * pfValue ) { HB_STACK_TLS_PRELOAD @@ -8571,7 +8571,7 @@ HB_EXPORT BOOL hb_xvmPopLogical( BOOL * pfValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPopAlias( void ) +BOOL hb_xvmPopAlias( void ) { HB_STACK_TLS_PRELOAD @@ -8583,7 +8583,7 @@ HB_EXPORT BOOL hb_xvmPopAlias( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmSwapAlias( void ) +BOOL hb_xvmSwapAlias( void ) { HB_STACK_TLS_PRELOAD @@ -8594,7 +8594,7 @@ HB_EXPORT BOOL hb_xvmSwapAlias( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPushField( PHB_SYMB pSymbol ) +BOOL hb_xvmPushField( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8605,7 +8605,7 @@ HB_EXPORT BOOL hb_xvmPushField( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPushAlias( void ) +BOOL hb_xvmPushAlias( void ) { HB_STACK_TLS_PRELOAD @@ -8616,7 +8616,7 @@ HB_EXPORT BOOL hb_xvmPushAlias( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPushAliasedField( PHB_SYMB pSymbol ) +BOOL hb_xvmPushAliasedField( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8627,7 +8627,7 @@ HB_EXPORT BOOL hb_xvmPushAliasedField( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPushAliasedVar( PHB_SYMB pSymbol ) +BOOL hb_xvmPushAliasedVar( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8638,7 +8638,7 @@ HB_EXPORT BOOL hb_xvmPushAliasedVar( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPopField( PHB_SYMB pSymbol ) +BOOL hb_xvmPopField( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8650,7 +8650,7 @@ HB_EXPORT BOOL hb_xvmPopField( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPushMemvar( PHB_SYMB pSymbol ) +BOOL hb_xvmPushMemvar( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8661,7 +8661,7 @@ HB_EXPORT BOOL hb_xvmPushMemvar( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPushMemvarByRef( PHB_SYMB pSymbol ) +BOOL hb_xvmPushMemvarByRef( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8672,7 +8672,7 @@ HB_EXPORT BOOL hb_xvmPushMemvarByRef( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPopMemvar( PHB_SYMB pSymbol ) +BOOL hb_xvmPopMemvar( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8684,7 +8684,7 @@ HB_EXPORT BOOL hb_xvmPopMemvar( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPopAliasedField( PHB_SYMB pSymbol ) +BOOL hb_xvmPopAliasedField( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8695,7 +8695,7 @@ HB_EXPORT BOOL hb_xvmPopAliasedField( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPopAliasedVar( PHB_SYMB pSymbol ) +BOOL hb_xvmPopAliasedVar( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -8706,7 +8706,7 @@ HB_EXPORT BOOL hb_xvmPopAliasedVar( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmLocalSetInt( int iLocal, LONG lValue ) +void hb_xvmLocalSetInt( int iLocal, LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pLocal; @@ -8741,7 +8741,7 @@ HB_EXPORT void hb_xvmLocalSetInt( int iLocal, LONG lValue ) } } -HB_EXPORT BOOL hb_xvmLocalAddInt( int iLocal, LONG lAdd ) +BOOL hb_xvmLocalAddInt( int iLocal, LONG lAdd ) { HB_STACK_TLS_PRELOAD @@ -8752,7 +8752,7 @@ HB_EXPORT BOOL hb_xvmLocalAddInt( int iLocal, LONG lAdd ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLocalInc( int iLocal ) +BOOL hb_xvmLocalInc( int iLocal ) { HB_STACK_TLS_PRELOAD PHB_ITEM pLocal; @@ -8765,7 +8765,7 @@ HB_EXPORT BOOL hb_xvmLocalInc( int iLocal ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLocalDec( int iLocal ) +BOOL hb_xvmLocalDec( int iLocal ) { HB_STACK_TLS_PRELOAD PHB_ITEM pLocal; @@ -8778,7 +8778,7 @@ HB_EXPORT BOOL hb_xvmLocalDec( int iLocal ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLocalIncPush( int iLocal ) +BOOL hb_xvmLocalIncPush( int iLocal ) { HB_STACK_TLS_PRELOAD PHB_ITEM pLocal; @@ -8794,7 +8794,7 @@ HB_EXPORT BOOL hb_xvmLocalIncPush( int iLocal ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLocalAdd( int iLocal ) +BOOL hb_xvmLocalAdd( int iLocal ) { HB_STACK_TLS_PRELOAD PHB_ITEM pLocal; @@ -8811,7 +8811,7 @@ HB_EXPORT BOOL hb_xvmLocalAdd( int iLocal ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmStaticAdd( USHORT uiStatic ) +BOOL hb_xvmStaticAdd( USHORT uiStatic ) { HB_STACK_TLS_PRELOAD PHB_ITEM pStatic; @@ -8828,7 +8828,7 @@ HB_EXPORT BOOL hb_xvmStaticAdd( USHORT uiStatic ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMemvarAdd( PHB_SYMB pSymbol ) +BOOL hb_xvmMemvarAdd( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD PHB_ITEM pMemVar, pVal1, pVal2; @@ -8857,7 +8857,7 @@ HB_EXPORT BOOL hb_xvmMemvarAdd( PHB_SYMB pSymbol ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmAnd( void ) +BOOL hb_xvmAnd( void ) { HB_STACK_TLS_PRELOAD @@ -8868,7 +8868,7 @@ HB_EXPORT BOOL hb_xvmAnd( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmOr( void ) +BOOL hb_xvmOr( void ) { HB_STACK_TLS_PRELOAD @@ -8879,7 +8879,7 @@ HB_EXPORT BOOL hb_xvmOr( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmNot( void ) +BOOL hb_xvmNot( void ) { HB_STACK_TLS_PRELOAD @@ -8890,7 +8890,7 @@ HB_EXPORT BOOL hb_xvmNot( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmNegate( void ) +BOOL hb_xvmNegate( void ) { HB_STACK_TLS_PRELOAD @@ -8901,42 +8901,42 @@ HB_EXPORT BOOL hb_xvmNegate( void ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmDuplicate( void ) +void hb_xvmDuplicate( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmDuplicate()")); hb_vmDuplicate(); } -HB_EXPORT void hb_xvmDuplUnRef( void ) +void hb_xvmDuplUnRef( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmDuplUnRef()")); hb_vmDuplUnRef(); } -HB_EXPORT void hb_xvmDuplTwo( void ) +void hb_xvmDuplTwo( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmDuplTwo()")); hb_vmDuplTwo(); } -HB_EXPORT void hb_xvmPushUnRef( void ) +void hb_xvmPushUnRef( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushUnRef()")); hb_vmPushUnRef(); } -HB_EXPORT void hb_xvmSwap( int iCount ) +void hb_xvmSwap( int iCount ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmSwap(%d)", iCount)); hb_vmSwap( ( BYTE ) iCount ); } -HB_EXPORT BOOL hb_xvmForTest( void ) +BOOL hb_xvmForTest( void ) { HB_STACK_TLS_PRELOAD @@ -8947,14 +8947,14 @@ HB_EXPORT BOOL hb_xvmForTest( void ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmFuncPtr( void ) +void hb_xvmFuncPtr( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmFuncPtr()")); hb_vmFuncPtr(); } -HB_EXPORT BOOL hb_xvmEqual( void ) +BOOL hb_xvmEqual( void ) { HB_STACK_TLS_PRELOAD @@ -8965,7 +8965,7 @@ HB_EXPORT BOOL hb_xvmEqual( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmExactlyEqual( void ) +BOOL hb_xvmExactlyEqual( void ) { HB_STACK_TLS_PRELOAD @@ -8976,7 +8976,7 @@ HB_EXPORT BOOL hb_xvmExactlyEqual( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmEqualInt( LONG lValue ) +BOOL hb_xvmEqualInt( LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9024,7 +9024,7 @@ HB_EXPORT BOOL hb_xvmEqualInt( LONG lValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmEqualIntIs( LONG lValue, BOOL * pfValue ) +BOOL hb_xvmEqualIntIs( LONG lValue, BOOL * pfValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9073,7 +9073,7 @@ HB_EXPORT BOOL hb_xvmEqualIntIs( LONG lValue, BOOL * pfValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmNotEqual( void ) +BOOL hb_xvmNotEqual( void ) { HB_STACK_TLS_PRELOAD @@ -9084,7 +9084,7 @@ HB_EXPORT BOOL hb_xvmNotEqual( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmNotEqualInt( LONG lValue ) +BOOL hb_xvmNotEqualInt( LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9132,7 +9132,7 @@ HB_EXPORT BOOL hb_xvmNotEqualInt( LONG lValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmNotEqualIntIs( LONG lValue, BOOL * pfValue ) +BOOL hb_xvmNotEqualIntIs( LONG lValue, BOOL * pfValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9181,7 +9181,7 @@ HB_EXPORT BOOL hb_xvmNotEqualIntIs( LONG lValue, BOOL * pfValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLess( void ) +BOOL hb_xvmLess( void ) { HB_STACK_TLS_PRELOAD @@ -9192,7 +9192,7 @@ HB_EXPORT BOOL hb_xvmLess( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLessThenInt( LONG lValue ) +BOOL hb_xvmLessThenInt( LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9234,7 +9234,7 @@ HB_EXPORT BOOL hb_xvmLessThenInt( LONG lValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLessThenIntIs( LONG lValue, BOOL * pfValue ) +BOOL hb_xvmLessThenIntIs( LONG lValue, BOOL * pfValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9278,7 +9278,7 @@ HB_EXPORT BOOL hb_xvmLessThenIntIs( LONG lValue, BOOL * pfValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLessEqual( void ) +BOOL hb_xvmLessEqual( void ) { HB_STACK_TLS_PRELOAD @@ -9289,7 +9289,7 @@ HB_EXPORT BOOL hb_xvmLessEqual( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLessEqualThenInt( LONG lValue ) +BOOL hb_xvmLessEqualThenInt( LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9331,7 +9331,7 @@ HB_EXPORT BOOL hb_xvmLessEqualThenInt( LONG lValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmLessEqualThenIntIs( LONG lValue, BOOL * pfValue ) +BOOL hb_xvmLessEqualThenIntIs( LONG lValue, BOOL * pfValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9375,7 +9375,7 @@ HB_EXPORT BOOL hb_xvmLessEqualThenIntIs( LONG lValue, BOOL * pfValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmGreater( void ) +BOOL hb_xvmGreater( void ) { HB_STACK_TLS_PRELOAD @@ -9386,7 +9386,7 @@ HB_EXPORT BOOL hb_xvmGreater( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmGreaterThenInt( LONG lValue ) +BOOL hb_xvmGreaterThenInt( LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9428,7 +9428,7 @@ HB_EXPORT BOOL hb_xvmGreaterThenInt( LONG lValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmGreaterThenIntIs( LONG lValue, BOOL * pfValue ) +BOOL hb_xvmGreaterThenIntIs( LONG lValue, BOOL * pfValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9472,7 +9472,7 @@ HB_EXPORT BOOL hb_xvmGreaterThenIntIs( LONG lValue, BOOL * pfValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmGreaterEqual( void ) +BOOL hb_xvmGreaterEqual( void ) { HB_STACK_TLS_PRELOAD @@ -9483,7 +9483,7 @@ HB_EXPORT BOOL hb_xvmGreaterEqual( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmGreaterEqualThenInt( LONG lValue ) +BOOL hb_xvmGreaterEqualThenInt( LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9525,7 +9525,7 @@ HB_EXPORT BOOL hb_xvmGreaterEqualThenInt( LONG lValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmGreaterEqualThenIntIs( LONG lValue, BOOL * pfValue ) +BOOL hb_xvmGreaterEqualThenIntIs( LONG lValue, BOOL * pfValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pItem; @@ -9569,7 +9569,7 @@ HB_EXPORT BOOL hb_xvmGreaterEqualThenIntIs( LONG lValue, BOOL * pfValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmInstring( void ) +BOOL hb_xvmInstring( void ) { HB_STACK_TLS_PRELOAD @@ -9580,7 +9580,7 @@ HB_EXPORT BOOL hb_xvmInstring( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmAddInt( LONG lAdd ) +BOOL hb_xvmAddInt( LONG lAdd ) { HB_STACK_TLS_PRELOAD @@ -9591,7 +9591,7 @@ HB_EXPORT BOOL hb_xvmAddInt( LONG lAdd ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPlus( void ) +BOOL hb_xvmPlus( void ) { HB_STACK_TLS_PRELOAD @@ -9604,7 +9604,7 @@ HB_EXPORT BOOL hb_xvmPlus( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPlusEq( void ) +BOOL hb_xvmPlusEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue; @@ -9621,7 +9621,7 @@ HB_EXPORT BOOL hb_xvmPlusEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPlusEqPop( void ) +BOOL hb_xvmPlusEqPop( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult; @@ -9636,7 +9636,7 @@ HB_EXPORT BOOL hb_xvmPlusEqPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMinus( void ) +BOOL hb_xvmMinus( void ) { HB_STACK_TLS_PRELOAD @@ -9649,7 +9649,7 @@ HB_EXPORT BOOL hb_xvmMinus( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMinusEq( void ) +BOOL hb_xvmMinusEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue; @@ -9666,7 +9666,7 @@ HB_EXPORT BOOL hb_xvmMinusEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMinusEqPop( void ) +BOOL hb_xvmMinusEqPop( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult; @@ -9681,7 +9681,7 @@ HB_EXPORT BOOL hb_xvmMinusEqPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMultByInt( LONG lValue ) +BOOL hb_xvmMultByInt( LONG lValue ) { HB_STACK_TLS_PRELOAD PHB_ITEM pValue; @@ -9723,7 +9723,7 @@ HB_EXPORT BOOL hb_xvmMultByInt( LONG lValue ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMult( void ) +BOOL hb_xvmMult( void ) { HB_STACK_TLS_PRELOAD @@ -9735,7 +9735,7 @@ HB_EXPORT BOOL hb_xvmMult( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMultEq( void ) +BOOL hb_xvmMultEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue; @@ -9752,7 +9752,7 @@ HB_EXPORT BOOL hb_xvmMultEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMultEqPop( void ) +BOOL hb_xvmMultEqPop( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult; @@ -9767,7 +9767,7 @@ HB_EXPORT BOOL hb_xvmMultEqPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmDivideByInt( LONG lDivisor ) +BOOL hb_xvmDivideByInt( LONG lDivisor ) { HB_STACK_TLS_PRELOAD PHB_ITEM pValue; @@ -9822,7 +9822,7 @@ HB_EXPORT BOOL hb_xvmDivideByInt( LONG lDivisor ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmDivide( void ) +BOOL hb_xvmDivide( void ) { HB_STACK_TLS_PRELOAD @@ -9834,7 +9834,7 @@ HB_EXPORT BOOL hb_xvmDivide( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmDivEq( void ) +BOOL hb_xvmDivEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue; @@ -9851,7 +9851,7 @@ HB_EXPORT BOOL hb_xvmDivEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmDivEqPop( void ) +BOOL hb_xvmDivEqPop( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult; @@ -9866,7 +9866,7 @@ HB_EXPORT BOOL hb_xvmDivEqPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmModulus( void ) +BOOL hb_xvmModulus( void ) { HB_STACK_TLS_PRELOAD @@ -9878,7 +9878,7 @@ HB_EXPORT BOOL hb_xvmModulus( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmModEq( void ) +BOOL hb_xvmModEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue; @@ -9895,7 +9895,7 @@ HB_EXPORT BOOL hb_xvmModEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmModEqPop( void ) +BOOL hb_xvmModEqPop( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult; @@ -9910,7 +9910,7 @@ HB_EXPORT BOOL hb_xvmModEqPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmPower( void ) +BOOL hb_xvmPower( void ) { HB_STACK_TLS_PRELOAD HB_TRACE(HB_TR_DEBUG, ("hb_xvmPower()")); @@ -9921,7 +9921,7 @@ HB_EXPORT BOOL hb_xvmPower( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmExpEq( void ) +BOOL hb_xvmExpEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue; @@ -9938,7 +9938,7 @@ HB_EXPORT BOOL hb_xvmExpEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmExpEqPop( void ) +BOOL hb_xvmExpEqPop( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult; @@ -9953,7 +9953,7 @@ HB_EXPORT BOOL hb_xvmExpEqPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmInc( void ) +BOOL hb_xvmInc( void ) { HB_STACK_TLS_PRELOAD HB_TRACE(HB_TR_DEBUG, ("hb_xvmInc()")); @@ -9963,7 +9963,7 @@ HB_EXPORT BOOL hb_xvmInc( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmIncEq( void ) +BOOL hb_xvmIncEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue, pTemp; @@ -9981,7 +9981,7 @@ HB_EXPORT BOOL hb_xvmIncEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmIncEqPop( void ) +BOOL hb_xvmIncEqPop( void ) { HB_STACK_TLS_PRELOAD @@ -9993,7 +9993,7 @@ HB_EXPORT BOOL hb_xvmIncEqPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmDec( void ) +BOOL hb_xvmDec( void ) { HB_STACK_TLS_PRELOAD @@ -10004,7 +10004,7 @@ HB_EXPORT BOOL hb_xvmDec( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmDecEq( void ) +BOOL hb_xvmDecEq( void ) { HB_STACK_TLS_PRELOAD PHB_ITEM pResult, pValue, pTemp; @@ -10022,7 +10022,7 @@ HB_EXPORT BOOL hb_xvmDecEq( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmDecEqPop( void ) +BOOL hb_xvmDecEqPop( void ) { HB_STACK_TLS_PRELOAD @@ -10034,21 +10034,21 @@ HB_EXPORT BOOL hb_xvmDecEqPop( void ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmArrayDim( USHORT uiDimensions ) +void hb_xvmArrayDim( USHORT uiDimensions ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmArrayDim(%hu)", uiDimensions)); hb_vmArrayDim( uiDimensions ); } -HB_EXPORT void hb_xvmArrayGen( ULONG ulElements ) +void hb_xvmArrayGen( ULONG ulElements ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmArrayGen(%lu)", ulElements)); hb_vmArrayGen( ulElements ); } -HB_EXPORT void hb_xvmHashGen( ULONG ulElements ) +void hb_xvmHashGen( ULONG ulElements ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmHashGen(%lu)", ulElements)); @@ -10225,7 +10225,7 @@ static void hb_vmArrayItemPop( ULONG ulIndex ) } -HB_EXPORT BOOL hb_xvmArrayPush( void ) +BOOL hb_xvmArrayPush( void ) { HB_STACK_TLS_PRELOAD @@ -10236,7 +10236,7 @@ HB_EXPORT BOOL hb_xvmArrayPush( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmArrayPushRef( void ) +BOOL hb_xvmArrayPushRef( void ) { HB_STACK_TLS_PRELOAD @@ -10247,7 +10247,7 @@ HB_EXPORT BOOL hb_xvmArrayPushRef( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmArrayItemPush( ULONG ulIndex ) +BOOL hb_xvmArrayItemPush( ULONG ulIndex ) { HB_STACK_TLS_PRELOAD @@ -10258,7 +10258,7 @@ HB_EXPORT BOOL hb_xvmArrayItemPush( ULONG ulIndex ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmArrayPop( void ) +BOOL hb_xvmArrayPop( void ) { HB_STACK_TLS_PRELOAD @@ -10269,7 +10269,7 @@ HB_EXPORT BOOL hb_xvmArrayPop( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmArrayItemPop( ULONG ulIndex ) +BOOL hb_xvmArrayItemPop( ULONG ulIndex ) { HB_STACK_TLS_PRELOAD @@ -10280,7 +10280,7 @@ HB_EXPORT BOOL hb_xvmArrayItemPop( ULONG ulIndex ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmPushDouble( double dNumber, int iWidth, int iDec ) +void hb_xvmPushDouble( double dNumber, int iWidth, int iDec ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushDouble(%lf, %d, %d)", dNumber, iWidth, iDec)); @@ -10288,14 +10288,14 @@ HB_EXPORT void hb_xvmPushDouble( double dNumber, int iWidth, int iDec ) } #ifdef HB_LONG_LONG_OFF -HB_EXPORT void hb_xvmPushLongLong( double dNumber ) +void hb_xvmPushLongLong( double dNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushLongLong(%l.0f)", dNumber)); hb_vmPushDoubleConst( dNumber, HB_DEFAULT_WIDTH, 0 ); } #else -HB_EXPORT void hb_xvmPushLongLong( LONGLONG llNumber ) +void hb_xvmPushLongLong( LONGLONG llNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushLongLong(%" PFLL "i)", llNumber)); @@ -10303,7 +10303,7 @@ HB_EXPORT void hb_xvmPushLongLong( LONGLONG llNumber ) } #endif -HB_EXPORT void hb_xvmPushStringHidden( int iMethod, const char * szText, ULONG ulSize ) +void hb_xvmPushStringHidden( int iMethod, const char * szText, ULONG ulSize ) { HB_STACK_TLS_PRELOAD char * szString; @@ -10314,7 +10314,7 @@ HB_EXPORT void hb_xvmPushStringHidden( int iMethod, const char * szText, ULONG u hb_itemPutCLPtr( hb_stackAllocItem(), szString, ulSize ); } -HB_EXPORT void hb_xvmLocalName( USHORT uiLocal, char * szLocalName ) +void hb_xvmLocalName( USHORT uiLocal, char * szLocalName ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmLocalName(%hu, %s)", uiLocal, szLocalName)); @@ -10326,7 +10326,7 @@ HB_EXPORT void hb_xvmLocalName( USHORT uiLocal, char * szLocalName ) #endif } -HB_EXPORT void hb_xvmStaticName( BYTE bIsGlobal, USHORT uiStatic, char * szStaticName ) +void hb_xvmStaticName( BYTE bIsGlobal, USHORT uiStatic, char * szStaticName ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmStaticName(%d, %hu, %s)", (int)bIsGlobal, uiStatic, szStaticName)); @@ -10339,7 +10339,7 @@ HB_EXPORT void hb_xvmStaticName( BYTE bIsGlobal, USHORT uiStatic, char * szStati #endif } -HB_EXPORT void hb_xvmModuleName( char * szModuleName ) +void hb_xvmModuleName( char * szModuleName ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmModuleName(%s)", szModuleName)); @@ -10350,7 +10350,7 @@ HB_EXPORT void hb_xvmModuleName( char * szModuleName ) #endif } -HB_EXPORT BOOL hb_xvmMacroArrayGen( USHORT uiArgSets ) +BOOL hb_xvmMacroArrayGen( USHORT uiArgSets ) { HB_STACK_TLS_PRELOAD @@ -10361,7 +10361,7 @@ HB_EXPORT BOOL hb_xvmMacroArrayGen( USHORT uiArgSets ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroDo( USHORT uiArgSets ) +BOOL hb_xvmMacroDo( USHORT uiArgSets ) { HB_STACK_TLS_PRELOAD @@ -10372,7 +10372,7 @@ HB_EXPORT BOOL hb_xvmMacroDo( USHORT uiArgSets ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroFunc( USHORT uiArgSets ) +BOOL hb_xvmMacroFunc( USHORT uiArgSets ) { HB_STACK_TLS_PRELOAD @@ -10383,7 +10383,7 @@ HB_EXPORT BOOL hb_xvmMacroFunc( USHORT uiArgSets ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroSend( USHORT uiArgSets ) +BOOL hb_xvmMacroSend( USHORT uiArgSets ) { HB_STACK_TLS_PRELOAD @@ -10394,7 +10394,7 @@ HB_EXPORT BOOL hb_xvmMacroSend( USHORT uiArgSets ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPush( BYTE bFlags ) +BOOL hb_xvmMacroPush( BYTE bFlags ) { HB_STACK_TLS_PRELOAD @@ -10405,7 +10405,7 @@ HB_EXPORT BOOL hb_xvmMacroPush( BYTE bFlags ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPushRef( void ) +BOOL hb_xvmMacroPushRef( void ) { HB_STACK_TLS_PRELOAD @@ -10421,7 +10421,7 @@ HB_EXPORT BOOL hb_xvmMacroPushRef( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPushIndex( void ) +BOOL hb_xvmMacroPushIndex( void ) { HB_STACK_TLS_PRELOAD @@ -10432,7 +10432,7 @@ HB_EXPORT BOOL hb_xvmMacroPushIndex( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPushList( BYTE bFlags ) +BOOL hb_xvmMacroPushList( BYTE bFlags ) { HB_STACK_TLS_PRELOAD @@ -10443,7 +10443,7 @@ HB_EXPORT BOOL hb_xvmMacroPushList( BYTE bFlags ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPushPare( BYTE bFlags ) +BOOL hb_xvmMacroPushPare( BYTE bFlags ) { HB_STACK_TLS_PRELOAD @@ -10454,7 +10454,7 @@ HB_EXPORT BOOL hb_xvmMacroPushPare( BYTE bFlags ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPushAliased( BYTE bFlags ) +BOOL hb_xvmMacroPushAliased( BYTE bFlags ) { HB_STACK_TLS_PRELOAD @@ -10465,7 +10465,7 @@ HB_EXPORT BOOL hb_xvmMacroPushAliased( BYTE bFlags ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPop( BYTE bFlags ) +BOOL hb_xvmMacroPop( BYTE bFlags ) { HB_STACK_TLS_PRELOAD @@ -10476,7 +10476,7 @@ HB_EXPORT BOOL hb_xvmMacroPop( BYTE bFlags ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroPopAliased( BYTE bFlags ) +BOOL hb_xvmMacroPopAliased( BYTE bFlags ) { HB_STACK_TLS_PRELOAD @@ -10487,7 +10487,7 @@ HB_EXPORT BOOL hb_xvmMacroPopAliased( BYTE bFlags ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroSymbol( void ) +BOOL hb_xvmMacroSymbol( void ) { HB_STACK_TLS_PRELOAD @@ -10498,7 +10498,7 @@ HB_EXPORT BOOL hb_xvmMacroSymbol( void ) HB_XVM_RETURN } -HB_EXPORT BOOL hb_xvmMacroText( void ) +BOOL hb_xvmMacroText( void ) { HB_STACK_TLS_PRELOAD @@ -10509,20 +10509,20 @@ HB_EXPORT BOOL hb_xvmMacroText( void ) HB_XVM_RETURN } -HB_EXPORT void hb_xvmPushVParams( void ) +void hb_xvmPushVParams( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmPushVParams()")); hb_vmPushVParams(); } -HB_EXPORT void hb_xvmWithObjectStart( void ) +void hb_xvmWithObjectStart( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_xvmWithObjectStart()")); hb_vmWithObjectStart(); } -HB_EXPORT void hb_xvmWithObjectEnd( void ) +void hb_xvmWithObjectEnd( void ) { HB_STACK_TLS_PRELOAD @@ -10532,7 +10532,7 @@ HB_EXPORT void hb_xvmWithObjectEnd( void ) hb_stackPop(); /* remove implicit object */ } -HB_EXPORT void hb_xvmWithObjectMessage( PHB_SYMB pSymbol ) +void hb_xvmWithObjectMessage( PHB_SYMB pSymbol ) { HB_STACK_TLS_PRELOAD @@ -10546,17 +10546,17 @@ HB_EXPORT void hb_xvmWithObjectMessage( PHB_SYMB pSymbol ) #undef hb_vmFlagEnabled -HB_EXPORT ULONG hb_vmFlagEnabled( ULONG flags ) +ULONG hb_vmFlagEnabled( ULONG flags ) { return s_VMFlags & flags; } -HB_EXPORT void hb_vmFlagSet( ULONG flags ) +void hb_vmFlagSet( ULONG flags ) { s_VMFlags |= flags; } -HB_EXPORT void hb_vmFlagClear( ULONG flags ) +void hb_vmFlagClear( ULONG flags ) { s_VMFlags &= ~flags; } @@ -10576,7 +10576,7 @@ void hb_vmRequestDebug( void ) #endif } -HB_EXPORT BOOL hb_dbg_InvokeDebug( BOOL bInvoke ) +BOOL hb_dbg_InvokeDebug( BOOL bInvoke ) { #ifndef HB_NO_DEBUG HB_STACK_TLS_PRELOAD @@ -10590,7 +10590,7 @@ HB_EXPORT BOOL hb_dbg_InvokeDebug( BOOL bInvoke ) #endif } -HB_EXPORT HB_DBGENTRY_FUNC hb_dbg_SetEntry( HB_DBGENTRY_FUNC pFunDbgEntry ) +HB_DBGENTRY_FUNC hb_dbg_SetEntry( HB_DBGENTRY_FUNC pFunDbgEntry ) { HB_DBGENTRY_FUNC pPrevFunc; @@ -10607,12 +10607,12 @@ HB_EXPORT HB_DBGENTRY_FUNC hb_dbg_SetEntry( HB_DBGENTRY_FUNC pFunDbgEntry ) return pPrevFunc; } -HB_EXPORT PHB_ITEM hb_dbg_vmVarSGet( int nStatic, int nOffset ) +PHB_ITEM hb_dbg_vmVarSGet( int nStatic, int nOffset ) { return hb_arrayGetItemPtr( &s_aStatics, nStatic + nOffset ); } -HB_EXPORT ULONG hb_dbg_ProcLevel( void ) +ULONG hb_dbg_ProcLevel( void ) { return hb_stackCallDepth(); } @@ -10687,7 +10687,7 @@ HB_FUNC( __DBGPROCLEVEL ) * compatibility with xHarbour debugger - Harbour does not support * GLOBALs */ -HB_EXPORT ULONG hb_dbg_vmVarGCount( void ) +ULONG hb_dbg_vmVarGCount( void ) { #if 0 return hb_arrayLen( &s_aGlobals ); @@ -10696,7 +10696,7 @@ HB_EXPORT ULONG hb_dbg_vmVarGCount( void ) #endif } -HB_EXPORT PHB_ITEM hb_dbg_vmVarGGet( int nGlobal, int nOffset ) +PHB_ITEM hb_dbg_vmVarGGet( int nGlobal, int nOffset ) { #if 0 return hb_arrayGetItemPtr( &s_aGlobals, nGlobal + nOffset ); diff --git a/harbour/source/vm/itemapi.c b/harbour/source/vm/itemapi.c index 825091814a..57f9031a41 100644 --- a/harbour/source/vm/itemapi.c +++ b/harbour/source/vm/itemapi.c @@ -108,14 +108,14 @@ # include #endif -HB_EXPORT PHB_ITEM hb_itemNew( PHB_ITEM pNull ) +PHB_ITEM hb_itemNew( PHB_ITEM pNull ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemNew(%p)", pNull)); return hb_gcGripGet( pNull ); } -HB_EXPORT PHB_ITEM hb_itemParam( USHORT uiParam ) +PHB_ITEM hb_itemParam( USHORT uiParam ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemParam(%hu)", uiParam)); @@ -124,14 +124,14 @@ HB_EXPORT PHB_ITEM hb_itemParam( USHORT uiParam ) /* Internal Item API. Use this with care. */ -HB_EXPORT PHB_ITEM hb_itemParamPtr( USHORT uiParam, long lMask ) +PHB_ITEM hb_itemParamPtr( USHORT uiParam, long lMask ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemParamPtr(%hu, %ld)", uiParam, lMask)); return hb_param( ( int ) uiParam, lMask ); } -HB_EXPORT BOOL hb_itemParamStore( USHORT uiParam, PHB_ITEM pItem ) +BOOL hb_itemParamStore( USHORT uiParam, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemParamStore(%hu, %p)", uiParam, pItem)); @@ -144,7 +144,7 @@ HB_EXPORT BOOL hb_itemParamStore( USHORT uiParam, PHB_ITEM pItem ) return FALSE; } -HB_EXPORT BOOL hb_itemParamStoreForward( USHORT uiParam, PHB_ITEM pItem ) +BOOL hb_itemParamStoreForward( USHORT uiParam, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemParamStoreForward(%hu, %p)", uiParam, pItem)); @@ -157,14 +157,14 @@ HB_EXPORT BOOL hb_itemParamStoreForward( USHORT uiParam, PHB_ITEM pItem ) return FALSE; } -HB_EXPORT USHORT hb_itemPCount( void ) +USHORT hb_itemPCount( void ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPCount()")); return ( USHORT ) hb_pcount(); } -HB_EXPORT BOOL hb_itemRelease( PHB_ITEM pItem ) +BOOL hb_itemRelease( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemRelease(%p)", pItem)); @@ -177,7 +177,7 @@ HB_EXPORT BOOL hb_itemRelease( PHB_ITEM pItem ) return FALSE; } -HB_EXPORT PHB_ITEM hb_itemArrayNew( ULONG ulLen ) +PHB_ITEM hb_itemArrayNew( ULONG ulLen ) { PHB_ITEM pItem; @@ -190,7 +190,7 @@ HB_EXPORT PHB_ITEM hb_itemArrayNew( ULONG ulLen ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemArrayGet( PHB_ITEM pArray, ULONG ulIndex ) +PHB_ITEM hb_itemArrayGet( PHB_ITEM pArray, ULONG ulIndex ) { PHB_ITEM pItem; @@ -204,7 +204,7 @@ HB_EXPORT PHB_ITEM hb_itemArrayGet( PHB_ITEM pArray, ULONG ulIndex ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemArrayPut( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) +PHB_ITEM hb_itemArrayPut( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemArrayPut(%p, %lu, %p)", pArray, ulIndex, pItem)); @@ -214,7 +214,7 @@ HB_EXPORT PHB_ITEM hb_itemArrayPut( PHB_ITEM pArray, ULONG ulIndex, PHB_ITEM pIt return pArray; } -HB_EXPORT PHB_ITEM hb_itemPutC( PHB_ITEM pItem, const char * szText ) +PHB_ITEM hb_itemPutC( PHB_ITEM pItem, const char * szText ) { ULONG ulLen, ulAlloc; @@ -248,7 +248,7 @@ HB_EXPORT PHB_ITEM hb_itemPutC( PHB_ITEM pItem, const char * szText ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutCL( PHB_ITEM pItem, const char * szText, ULONG ulLen ) +PHB_ITEM hb_itemPutCL( PHB_ITEM pItem, const char * szText, ULONG ulLen ) { ULONG ulAlloc; @@ -286,7 +286,7 @@ HB_EXPORT PHB_ITEM hb_itemPutCL( PHB_ITEM pItem, const char * szText, ULONG ulLe return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutCConst( PHB_ITEM pItem, const char * szText ) +PHB_ITEM hb_itemPutCConst( PHB_ITEM pItem, const char * szText ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutCConst(%p, %s)", pItem, szText)); @@ -315,7 +315,7 @@ HB_EXPORT PHB_ITEM hb_itemPutCConst( PHB_ITEM pItem, const char * szText ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutCLConst( PHB_ITEM pItem, const char * szText, ULONG ulLen ) +PHB_ITEM hb_itemPutCLConst( PHB_ITEM pItem, const char * szText, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutCConst(%p, %s, %lu)", pItem, szText, ulLen)); @@ -347,7 +347,7 @@ HB_EXPORT PHB_ITEM hb_itemPutCLConst( PHB_ITEM pItem, const char * szText, ULONG return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutCPtr2( PHB_ITEM pItem, char * szText ) +PHB_ITEM hb_itemPutCPtr2( PHB_ITEM pItem, char * szText ) { ULONG ulLen; @@ -387,12 +387,12 @@ HB_EXPORT PHB_ITEM hb_itemPutCPtr2( PHB_ITEM pItem, char * szText ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutCPtr( PHB_ITEM pItem, char * szText, ULONG ulLen ) +PHB_ITEM hb_itemPutCPtr( PHB_ITEM pItem, char * szText, ULONG ulLen ) { return hb_itemPutCLPtr( pItem, szText, ulLen ); } -HB_EXPORT PHB_ITEM hb_itemPutCLPtr( PHB_ITEM pItem, char * szText, ULONG ulLen ) +PHB_ITEM hb_itemPutCLPtr( PHB_ITEM pItem, char * szText, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutCLPtr(%p, %s, %lu)", pItem, szText, ulLen)); @@ -428,7 +428,7 @@ HB_EXPORT PHB_ITEM hb_itemPutCLPtr( PHB_ITEM pItem, char * szText, ULONG ulLen ) return pItem; } -HB_EXPORT void hb_itemSetCMemo( PHB_ITEM pItem ) +void hb_itemSetCMemo( PHB_ITEM pItem ) { if( pItem && HB_IS_STRING( pItem ) ) pItem->type |= HB_IT_MEMOFLAG; @@ -436,7 +436,7 @@ HB_EXPORT void hb_itemSetCMemo( PHB_ITEM pItem ) /* NOTE: The caller should free the pointer if it's not NULL. [vszakats] */ -HB_EXPORT char * hb_itemGetC( PHB_ITEM pItem ) +char * hb_itemGetC( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetC(%p)", pItem)); @@ -455,7 +455,7 @@ HB_EXPORT char * hb_itemGetC( PHB_ITEM pItem ) /* NOTE: Caller should not modify the buffer returned by this function. [vszakats] */ -HB_EXPORT char * hb_itemGetCPtr( PHB_ITEM pItem ) +char * hb_itemGetCPtr( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetCPtr(%p)", pItem)); @@ -465,7 +465,7 @@ HB_EXPORT char * hb_itemGetCPtr( PHB_ITEM pItem ) return ( char * ) ""; } -HB_EXPORT ULONG hb_itemGetCLen( PHB_ITEM pItem ) +ULONG hb_itemGetCLen( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetCLen(%p)", pItem)); @@ -475,7 +475,7 @@ HB_EXPORT ULONG hb_itemGetCLen( PHB_ITEM pItem ) return 0; } -HB_EXPORT ULONG hb_itemCopyC( PHB_ITEM pItem, char * szBuffer, ULONG ulLen ) +ULONG hb_itemCopyC( PHB_ITEM pItem, char * szBuffer, ULONG ulLen ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemCopyC(%p, %s, %lu)", pItem, szBuffer, ulLen)); @@ -492,7 +492,7 @@ HB_EXPORT ULONG hb_itemCopyC( PHB_ITEM pItem, char * szBuffer, ULONG ulLen ) return 0; } -HB_EXPORT BOOL hb_itemFreeC( char * szText ) +BOOL hb_itemFreeC( char * szText ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemFreeC(%s)", szText)); @@ -512,7 +512,7 @@ HB_EXPORT BOOL hb_itemFreeC( char * szText ) The correct buffer size is 9 bytes: char szDate[ 9 ] [vszakats] */ -HB_EXPORT char * hb_itemGetDS( PHB_ITEM pItem, char * szDate ) +char * hb_itemGetDS( PHB_ITEM pItem, char * szDate ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetDS(%p, %s)", szDate)); @@ -522,7 +522,7 @@ HB_EXPORT char * hb_itemGetDS( PHB_ITEM pItem, char * szDate ) return hb_dateDecStr( szDate, 0 ); } -HB_EXPORT long hb_itemGetDL( PHB_ITEM pItem ) +long hb_itemGetDL( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetDL(%p)", pItem)); @@ -532,7 +532,7 @@ HB_EXPORT long hb_itemGetDL( PHB_ITEM pItem ) return 0; } -HB_EXPORT BOOL hb_itemGetL( PHB_ITEM pItem ) +BOOL hb_itemGetL( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetL(%p)", pItem)); @@ -554,7 +554,7 @@ HB_EXPORT BOOL hb_itemGetL( PHB_ITEM pItem ) return FALSE; } -HB_EXPORT double hb_itemGetND( PHB_ITEM pItem ) +double hb_itemGetND( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetND(%p)", pItem)); @@ -573,7 +573,7 @@ HB_EXPORT double hb_itemGetND( PHB_ITEM pItem ) return 0; } -HB_EXPORT int hb_itemGetNI( PHB_ITEM pItem ) +int hb_itemGetNI( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetNI(%p)", pItem)); @@ -592,7 +592,7 @@ HB_EXPORT int hb_itemGetNI( PHB_ITEM pItem ) return 0; } -HB_EXPORT LONG hb_itemGetNL( PHB_ITEM pItem ) +LONG hb_itemGetNL( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetNL(%p)", pItem)); @@ -618,7 +618,7 @@ HB_EXPORT LONG hb_itemGetNL( PHB_ITEM pItem ) return 0; } -HB_EXPORT HB_LONG hb_itemGetNInt( PHB_ITEM pItem ) +HB_LONG hb_itemGetNInt( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetNL(%p)", pItem)); @@ -645,7 +645,7 @@ HB_EXPORT HB_LONG hb_itemGetNInt( PHB_ITEM pItem ) } #ifndef HB_LONG_LONG_OFF -HB_EXPORT LONGLONG hb_itemGetNLL( PHB_ITEM pItem ) +LONGLONG hb_itemGetNLL( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetNL(%p)", pItem)); @@ -672,7 +672,7 @@ HB_EXPORT LONGLONG hb_itemGetNLL( PHB_ITEM pItem ) } #endif -HB_EXPORT void * hb_itemGetPtr( PHB_ITEM pItem ) +void * hb_itemGetPtr( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetPtr(%p)", pItem)); @@ -682,7 +682,7 @@ HB_EXPORT void * hb_itemGetPtr( PHB_ITEM pItem ) return NULL; } -HB_EXPORT void * hb_itemGetPtrGC( PHB_ITEM pItem, HB_GARBAGE_FUNC_PTR pFunc ) +void * hb_itemGetPtrGC( PHB_ITEM pItem, HB_GARBAGE_FUNC_PTR pFunc ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetPtrGC(%p,%p)", pItem, pFunc)); @@ -694,7 +694,7 @@ HB_EXPORT void * hb_itemGetPtrGC( PHB_ITEM pItem, HB_GARBAGE_FUNC_PTR pFunc ) return NULL; } -HB_EXPORT PHB_SYMB hb_itemGetSymbol( PHB_ITEM pItem ) +PHB_SYMB hb_itemGetSymbol( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetSymbol(%p)", pItem)); @@ -704,7 +704,7 @@ HB_EXPORT PHB_SYMB hb_itemGetSymbol( PHB_ITEM pItem ) return NULL; } -HB_EXPORT PHB_ITEM hb_itemReturn( PHB_ITEM pItem ) +PHB_ITEM hb_itemReturn( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemReturn(%p)", pItem)); @@ -714,7 +714,7 @@ HB_EXPORT PHB_ITEM hb_itemReturn( PHB_ITEM pItem ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemReturnForward( PHB_ITEM pItem ) +PHB_ITEM hb_itemReturnForward( PHB_ITEM pItem ) { HB_TRACE_STEALTH( HB_TR_DEBUG, ("hb_itemReturnForward(%p)", pItem ) ); @@ -724,7 +724,7 @@ HB_EXPORT PHB_ITEM hb_itemReturnForward( PHB_ITEM pItem ) return pItem; } -HB_EXPORT void hb_itemReturnRelease( PHB_ITEM pItem ) +void hb_itemReturnRelease( PHB_ITEM pItem ) { HB_TRACE_STEALTH( HB_TR_DEBUG, ("hb_itemReturnRelease(%p)", pItem ) ); @@ -736,7 +736,7 @@ HB_EXPORT void hb_itemReturnRelease( PHB_ITEM pItem ) } -HB_EXPORT PHB_ITEM hb_itemPutDS( PHB_ITEM pItem, const char * szDate ) +PHB_ITEM hb_itemPutDS( PHB_ITEM pItem, const char * szDate ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutDS(%p, %s)", pItem, szDate)); @@ -754,7 +754,7 @@ HB_EXPORT PHB_ITEM hb_itemPutDS( PHB_ITEM pItem, const char * szDate ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutD( PHB_ITEM pItem, int iYear, int iMonth, int iDay ) +PHB_ITEM hb_itemPutD( PHB_ITEM pItem, int iYear, int iMonth, int iDay ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutD(%p, %04i, %02i, %02i)", pItem, iYear, iMonth, iDay)); @@ -772,7 +772,7 @@ HB_EXPORT PHB_ITEM hb_itemPutD( PHB_ITEM pItem, int iYear, int iMonth, int iDay return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutDL( PHB_ITEM pItem, long lJulian ) +PHB_ITEM hb_itemPutDL( PHB_ITEM pItem, long lJulian ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutDL(%p, %ld)", pItem, lJulian)); @@ -790,7 +790,7 @@ HB_EXPORT PHB_ITEM hb_itemPutDL( PHB_ITEM pItem, long lJulian ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutL( PHB_ITEM pItem, BOOL bValue ) +PHB_ITEM hb_itemPutL( PHB_ITEM pItem, BOOL bValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutL(%p, %d)", pItem, (int) bValue)); @@ -808,7 +808,7 @@ HB_EXPORT PHB_ITEM hb_itemPutL( PHB_ITEM pItem, BOOL bValue ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutND( PHB_ITEM pItem, double dNumber ) +PHB_ITEM hb_itemPutND( PHB_ITEM pItem, double dNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutND(%p, %lf)", pItem, dNumber)); @@ -828,7 +828,7 @@ HB_EXPORT PHB_ITEM hb_itemPutND( PHB_ITEM pItem, double dNumber ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutNI( PHB_ITEM pItem, int iNumber ) +PHB_ITEM hb_itemPutNI( PHB_ITEM pItem, int iNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNI(%p, %d)", pItem, iNumber)); @@ -847,7 +847,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNI( PHB_ITEM pItem, int iNumber ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutNL( PHB_ITEM pItem, LONG lNumber ) +PHB_ITEM hb_itemPutNL( PHB_ITEM pItem, LONG lNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNL(%p, %ld)", pItem, lNumber)); @@ -873,7 +873,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNL( PHB_ITEM pItem, LONG lNumber ) } #ifndef HB_LONG_LONG_OFF -HB_EXPORT PHB_ITEM hb_itemPutNLL( PHB_ITEM pItem, LONGLONG llNumber ) +PHB_ITEM hb_itemPutNLL( PHB_ITEM pItem, LONGLONG llNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNL(%p, %" PFLL "d)", pItem, llNumber)); @@ -899,7 +899,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNLL( PHB_ITEM pItem, LONGLONG llNumber ) } #endif -HB_EXPORT PHB_ITEM hb_itemPutNInt( PHB_ITEM pItem, HB_LONG lNumber ) +PHB_ITEM hb_itemPutNInt( PHB_ITEM pItem, HB_LONG lNumber ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNInt(%p, %" PFHL "d)", pItem, lNumber)); @@ -928,7 +928,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNInt( PHB_ITEM pItem, HB_LONG lNumber ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutNIntLen( PHB_ITEM pItem, HB_LONG lNumber, int iWidth ) +PHB_ITEM hb_itemPutNIntLen( PHB_ITEM pItem, HB_LONG lNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNIntLen(%p, %" PFHL "d, %d)", pItem, lNumber, iWidth)); @@ -946,7 +946,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNIntLen( PHB_ITEM pItem, HB_LONG lNumber, int iWidt } } -HB_EXPORT PHB_ITEM hb_itemPutNLen( PHB_ITEM pItem, double dNumber, int iWidth, int iDec ) +PHB_ITEM hb_itemPutNLen( PHB_ITEM pItem, double dNumber, int iWidth, int iDec ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNLen(%p, %lf, %d, %d)", pItem, dNumber, iWidth, iDec)); @@ -970,7 +970,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNLen( PHB_ITEM pItem, double dNumber, int iWidth, i return hb_itemPutNDLen( pItem, dNumber, iWidth, 0 ); } -HB_EXPORT PHB_ITEM hb_itemPutNDLen( PHB_ITEM pItem, double dNumber, int iWidth, int iDec ) +PHB_ITEM hb_itemPutNDLen( PHB_ITEM pItem, double dNumber, int iWidth, int iDec ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNDLen(%p, %lf, %d, %d)", pItem, dNumber, iWidth, iDec)); @@ -1006,7 +1006,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNDLen( PHB_ITEM pItem, double dNumber, int iWidth, return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutNDDec( PHB_ITEM pItem, double dNumber, int iDec ) +PHB_ITEM hb_itemPutNDDec( PHB_ITEM pItem, double dNumber, int iDec ) { HB_TRACE_STEALTH(HB_TR_DEBUG, ("hb_itemPutNDDec(%p, %lf, %i)", pItem, dNumber, iDec)); @@ -1035,7 +1035,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNDDec( PHB_ITEM pItem, double dNumber, int iDec ) return pItem; } -HB_EXPORT double hb_itemGetNDDec( PHB_ITEM pItem, int * piDec ) +double hb_itemGetNDDec( PHB_ITEM pItem, int * piDec ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetNDDec(%p,%p)", pItem, piDec)); @@ -1060,7 +1060,7 @@ HB_EXPORT double hb_itemGetNDDec( PHB_ITEM pItem, int * piDec ) } -HB_EXPORT PHB_ITEM hb_itemPutNILen( PHB_ITEM pItem, int iNumber, int iWidth ) +PHB_ITEM hb_itemPutNILen( PHB_ITEM pItem, int iNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNILen(%p, %d, %d)", pItem, iNumber, iWidth)); @@ -1082,7 +1082,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNILen( PHB_ITEM pItem, int iNumber, int iWidth ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutNLLen( PHB_ITEM pItem, LONG lNumber, int iWidth ) +PHB_ITEM hb_itemPutNLLen( PHB_ITEM pItem, LONG lNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNLLen(%p, %ld, %d)", pItem, lNumber, iWidth)); @@ -1114,7 +1114,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNLLen( PHB_ITEM pItem, LONG lNumber, int iWidth ) } #ifndef HB_LONG_LONG_OFF -HB_EXPORT PHB_ITEM hb_itemPutNLLLen( PHB_ITEM pItem, LONGLONG llNumber, int iWidth ) +PHB_ITEM hb_itemPutNLLLen( PHB_ITEM pItem, LONGLONG llNumber, int iWidth ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNLLLen(%p, %" PFLL "d, %d)", pItem, llNumber, iWidth)); @@ -1146,7 +1146,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNLLLen( PHB_ITEM pItem, LONGLONG llNumber, int iWid } #endif -HB_EXPORT PHB_ITEM hb_itemPutNumType( PHB_ITEM pItem, double dNumber, int iDec, int iType1, int iType2 ) +PHB_ITEM hb_itemPutNumType( PHB_ITEM pItem, double dNumber, int iDec, int iType1, int iType2 ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutNumType( %p, %lf, %d, %i, %i)", pItem, dNumber, iDec, iType1, iType2)); @@ -1172,7 +1172,7 @@ HB_EXPORT PHB_ITEM hb_itemPutNumType( PHB_ITEM pItem, double dNumber, int iDec, } } -HB_EXPORT PHB_ITEM hb_itemPutPtr( PHB_ITEM pItem, void * pValue ) +PHB_ITEM hb_itemPutPtr( PHB_ITEM pItem, void * pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutPtr(%p, %p)", pItem, pValue)); @@ -1192,7 +1192,7 @@ HB_EXPORT PHB_ITEM hb_itemPutPtr( PHB_ITEM pItem, void * pValue ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutPtrGC( PHB_ITEM pItem, void * pValue ) +PHB_ITEM hb_itemPutPtrGC( PHB_ITEM pItem, void * pValue ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutPtrGC(%p, %p)", pItem, pValue)); @@ -1212,7 +1212,7 @@ HB_EXPORT PHB_ITEM hb_itemPutPtrGC( PHB_ITEM pItem, void * pValue ) return pItem; } -HB_EXPORT PHB_ITEM hb_itemPutSymbol( PHB_ITEM pItem, PHB_SYMB pSym ) +PHB_ITEM hb_itemPutSymbol( PHB_ITEM pItem, PHB_SYMB pSym ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemPutSymbol(%p,%p)", pItem, pSym)); @@ -1233,7 +1233,7 @@ HB_EXPORT PHB_ITEM hb_itemPutSymbol( PHB_ITEM pItem, PHB_SYMB pSym ) return pItem; } -HB_EXPORT void hb_itemGetNLen( PHB_ITEM pItem, int * piWidth, int * piDecimal ) +void hb_itemGetNLen( PHB_ITEM pItem, int * piWidth, int * piDecimal ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemGetNLen(%p, %p, %p)", pItem, piWidth, piDecimal)); @@ -1262,7 +1262,7 @@ HB_EXPORT void hb_itemGetNLen( PHB_ITEM pItem, int * piWidth, int * piDecimal ) } } -HB_EXPORT ULONG hb_itemSize( PHB_ITEM pItem ) +ULONG hb_itemSize( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemSize(%p)", pItem)); @@ -1279,7 +1279,7 @@ HB_EXPORT ULONG hb_itemSize( PHB_ITEM pItem ) return 0; } -HB_EXPORT HB_TYPE hb_itemType( PHB_ITEM pItem ) +HB_TYPE hb_itemType( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemType(%p)", pItem)); @@ -1289,7 +1289,7 @@ HB_EXPORT HB_TYPE hb_itemType( PHB_ITEM pItem ) return HB_IT_NIL; } -HB_EXPORT char * hb_itemTypeStr( PHB_ITEM pItem ) +char * hb_itemTypeStr( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemTypeStr(%p)", pItem)); @@ -1333,7 +1333,7 @@ HB_EXPORT char * hb_itemTypeStr( PHB_ITEM pItem ) /* Internal API, not standard Clipper */ -HB_EXPORT void hb_itemInit( PHB_ITEM pItem ) +void hb_itemInit( PHB_ITEM pItem ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemInit(%p)", pItem)); @@ -1341,7 +1341,7 @@ HB_EXPORT void hb_itemInit( PHB_ITEM pItem ) pItem->type = HB_IT_NIL; } -HB_EXPORT void hb_itemClear( PHB_ITEM pItem ) +void hb_itemClear( PHB_ITEM pItem ) { HB_TYPE type; @@ -1390,7 +1390,7 @@ HB_EXPORT void hb_itemClear( PHB_ITEM pItem ) /* Internal API, not standard Clipper */ -HB_EXPORT void hb_itemCopy( PHB_ITEM pDest, PHB_ITEM pSource ) +void hb_itemCopy( PHB_ITEM pDest, PHB_ITEM pSource ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemCopy(%p, %p)", pDest, pSource)); @@ -1502,7 +1502,7 @@ void hb_itemCopyFromRef( PHB_ITEM pDest, PHB_ITEM pSource ) * copy (transfer) the value of item without increasing * a reference counters, the pSource item is cleared */ -HB_EXPORT void hb_itemMove( PHB_ITEM pDest, PHB_ITEM pSource ) +void hb_itemMove( PHB_ITEM pDest, PHB_ITEM pSource ) { HB_TRACE(HB_TR_DEBUG, ("hb_itemMove(%p, %p)", pDest, pSource)); @@ -1617,7 +1617,7 @@ void hb_itemMoveFromRef( PHB_ITEM pDest, PHB_ITEM pSource ) /* Internal API, not standard Clipper */ -HB_EXPORT void hb_itemSwap( PHB_ITEM pItem1, PHB_ITEM pItem2 ) +void hb_itemSwap( PHB_ITEM pItem1, PHB_ITEM pItem2 ) { HB_ITEM temp; @@ -1909,7 +1909,7 @@ PHB_ITEM hb_itemUnShare( PHB_ITEM pItem ) /* Internal API, not standard Clipper */ /* clone the given item */ -HB_EXPORT PHB_ITEM hb_itemClone( PHB_ITEM pItem ) +PHB_ITEM hb_itemClone( PHB_ITEM pItem ) { HB_TRACE_STEALTH(HB_TR_DEBUG, ("hb_itemClone(%p)", pItem)); @@ -1931,7 +1931,7 @@ HB_EXPORT PHB_ITEM hb_itemClone( PHB_ITEM pItem ) /* Internal API, not standard Clipper */ /* Check whether two strings are equal (0), smaller (-1), or greater (1) */ -HB_EXPORT int hb_itemStrCmp( PHB_ITEM pFirst, PHB_ITEM pSecond, BOOL bForceExact ) +int hb_itemStrCmp( PHB_ITEM pFirst, PHB_ITEM pSecond, BOOL bForceExact ) { const char * szFirst; const char * szSecond; @@ -2011,7 +2011,7 @@ HB_EXPORT int hb_itemStrCmp( PHB_ITEM pFirst, PHB_ITEM pSecond, BOOL bForceExact } /* Check whether two strings are equal (0), smaller (-1), or greater (1), ignore case */ -HB_EXPORT int hb_itemStrICmp( PHB_ITEM pFirst, PHB_ITEM pSecond, BOOL bForceExact ) +int hb_itemStrICmp( PHB_ITEM pFirst, PHB_ITEM pSecond, BOOL bForceExact ) { const char * szFirst; const char * szSecond; @@ -2094,7 +2094,7 @@ HB_EXPORT int hb_itemStrICmp( PHB_ITEM pFirst, PHB_ITEM pSecond, BOOL bForceExac /* converts a numeric to a string with optional width & precision. */ -HB_EXPORT BOOL hb_itemStrBuf( char *szResult, PHB_ITEM pNumber, int iSize, int iDec ) +BOOL hb_itemStrBuf( char *szResult, PHB_ITEM pNumber, int iSize, int iDec ) { int iPos, iDot; BOOL fNeg; @@ -2361,7 +2361,7 @@ HB_EXPORT BOOL hb_itemStrBuf( char *szResult, PHB_ITEM pNumber, int iSize, int i buffer, but ONLY if the return value is not a NULL pointer! (If a NULL pointer is returned, then there was a conversion error.) */ -HB_EXPORT char * hb_itemStr( PHB_ITEM pNumber, PHB_ITEM pWidth, PHB_ITEM pDec ) +char * hb_itemStr( PHB_ITEM pNumber, PHB_ITEM pWidth, PHB_ITEM pDec ) { char * szResult = NULL; @@ -2421,7 +2421,7 @@ HB_EXPORT char * hb_itemStr( PHB_ITEM pNumber, PHB_ITEM pWidth, PHB_ITEM pDec ) As a side effect the caller should never modify the returned buffer since it may point to a constant value. [vszakats] */ -HB_EXPORT char * hb_itemString( PHB_ITEM pItem, ULONG * ulLen, BOOL * bFreeReq ) +char * hb_itemString( PHB_ITEM pItem, ULONG * ulLen, BOOL * bFreeReq ) { char * buffer; @@ -2527,7 +2527,7 @@ HB_EXPORT char * hb_itemString( PHB_ITEM pItem, ULONG * ulLen, BOOL * bFreeReq ) being padded. If date, convert to string using hb_dateFormat(). If numeric, convert to unpadded string. Return pointer to string and set string length */ -HB_EXPORT char * hb_itemPadConv( PHB_ITEM pItem, ULONG * pulSize, BOOL * bFreeReq ) +char * hb_itemPadConv( PHB_ITEM pItem, ULONG * pulSize, BOOL * bFreeReq ) { HB_TRACE_STEALTH(HB_TR_DEBUG, ("hb_itemPadConv(%p, %p, %p)", pItem, pulSize, bFreeReq)); @@ -2571,7 +2571,7 @@ HB_EXPORT char * hb_itemPadConv( PHB_ITEM pItem, ULONG * pulSize, BOOL * bFreeRe return NULL; } -HB_EXPORT PHB_ITEM hb_itemValToStr( PHB_ITEM pItem ) +PHB_ITEM hb_itemValToStr( PHB_ITEM pItem ) { PHB_ITEM pResult; char * buffer; diff --git a/harbour/source/vm/maindll.c b/harbour/source/vm/maindll.c index ac03ad3e1b..bd8c4b10ca 100644 --- a/harbour/source/vm/maindll.c +++ b/harbour/source/vm/maindll.c @@ -62,7 +62,7 @@ #if defined(HB_OS_WIN_32) -HB_EXPORT BOOL WINAPI DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved ) +BOOL WINAPI DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved ) { HB_TRACE( HB_TR_DEBUG, ("DllEntryPoint(%p, %p, %p)", hInstance, fdwReason, pvReserved ) ); @@ -85,21 +85,21 @@ HB_EXPORT BOOL WINAPI DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID return TRUE; } -HB_EXPORT LONG PASCAL HBDLLENTRY( char * cProcName ) +LONG PASCAL HBDLLENTRY( char * cProcName ) { hb_itemDoC( cProcName, 0, 0 ); return 0; } -HB_EXPORT LONG PASCAL HBDLLENTRY1( char * cProcName, LONG pItem ) +LONG PASCAL HBDLLENTRY1( char * cProcName, LONG pItem ) { hb_itemDoC( cProcName, 1, ( PHB_ITEM ) pItem, 0 ); return 0; } -HB_EXPORT LONG PASCAL HBDLLENTRY2( char * cProcName, LONG pItem1, LONG pItem2 ) +LONG PASCAL HBDLLENTRY2( char * cProcName, LONG pItem1, LONG pItem2 ) { hb_itemDoC( cProcName, 2, ( PHB_ITEM ) pItem1, ( PHB_ITEM ) pItem2, 0 ); diff --git a/harbour/source/vm/maindllh.c b/harbour/source/vm/maindllh.c index 34c8de8ff6..d74aae6807 100644 --- a/harbour/source/vm/maindllh.c +++ b/harbour/source/vm/maindllh.c @@ -62,7 +62,7 @@ #if defined(HB_OS_WIN_32) -HB_EXPORT BOOL WINAPI DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved ) +BOOL WINAPI DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved ) { HB_TRACE( HB_TR_DEBUG, ("DllEntryPoint(%p, %p, %d)", hInstance, fdwReason, pvReserved ) ); diff --git a/harbour/source/vm/maindllp.c b/harbour/source/vm/maindllp.c index 74e61e22aa..c094e56d29 100644 --- a/harbour/source/vm/maindllp.c +++ b/harbour/source/vm/maindllp.c @@ -100,7 +100,7 @@ static FARPROC hb_getProcAddress( LPCSTR szProcName ) return pProcAddr; } -HB_EXPORT BOOL WINAPI DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved ) +BOOL WINAPI DllEntryPoint( HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved ) { HB_TRACE( HB_TR_DEBUG, ("DllEntryPoint(%p, %p, %d)", hInstance, fdwReason, pvReserved ) ); diff --git a/harbour/source/vm/mainstd.c b/harbour/source/vm/mainstd.c index 2e6a251c30..cd4cd59b84 100644 --- a/harbour/source/vm/mainstd.c +++ b/harbour/source/vm/mainstd.c @@ -78,7 +78,7 @@ char ** __crt0_glob_function( char * _arg ) #endif #if defined(__WATCOMC__) && ( defined(HB_OS_LINUX) || defined(HB_OS_OS2) ) -HB_EXPORT void hb_forceLinkMainStd( void ) {} +void hb_forceLinkMainStd( void ) {} #endif HB_EXTERN_END diff --git a/harbour/source/vm/mainwin.c b/harbour/source/vm/mainwin.c index 8583a2550d..ce6c8b0819 100644 --- a/harbour/source/vm/mainwin.c +++ b/harbour/source/vm/mainwin.c @@ -62,7 +62,7 @@ #if !defined(HB_DYNLIB) && ( defined(__DMC__) || defined(__WATCOMC__) || defined(__MINGW32__) ) HB_EXTERN_BEGIN -HB_EXPORT void hb_forceLinkMainWin( void ) {} +void hb_forceLinkMainWin( void ) {} HB_EXTERN_END #endif diff --git a/harbour/source/vm/set.c b/harbour/source/vm/set.c index 6170d14eb5..8c29f09dcb 100644 --- a/harbour/source/vm/set.c +++ b/harbour/source/vm/set.c @@ -297,7 +297,7 @@ static HB_FHANDLE open_handle( PHB_SET_STRUCT pSet, const char * file_name, BOOL return handle; } -HB_EXPORT BOOL hb_setSetCentury( BOOL new_century_setting ) +BOOL hb_setSetCentury( BOOL new_century_setting ) { PHB_SET_STRUCT pSet = hb_stackSetStruct(); BOOL old_century_setting = pSet->hb_set_century; @@ -1271,7 +1271,7 @@ static BOOL hb_setSetFile( HB_set_enum set_specifier, const char * szFile, BOOL return fResult; } -HB_EXPORT BOOL hb_setSetItem( HB_set_enum set_specifier, PHB_ITEM pItem ) +BOOL hb_setSetItem( HB_set_enum set_specifier, PHB_ITEM pItem ) { PHB_SET_STRUCT pSet = hb_stackSetStruct(); BOOL fResult = FALSE; @@ -1836,7 +1836,7 @@ HB_EXPORT BOOL hb_setSetItem( HB_set_enum set_specifier, PHB_ITEM pItem ) return fResult; } -HB_EXPORT BOOL hb_setSetItem2( HB_set_enum set_specifier, PHB_ITEM pItem1, PHB_ITEM pItem2 ) +BOOL hb_setSetItem2( HB_set_enum set_specifier, PHB_ITEM pItem1, PHB_ITEM pItem2 ) { BOOL fResult = FALSE; @@ -1860,7 +1860,7 @@ HB_EXPORT BOOL hb_setSetItem2( HB_set_enum set_specifier, PHB_ITEM pItem1, PHB_I return fResult; } -HB_EXPORT BOOL hb_setGetL( HB_set_enum set_specifier ) +BOOL hb_setGetL( HB_set_enum set_specifier ) { PHB_SET_STRUCT pSet = hb_stackSetStruct(); @@ -1977,7 +1977,7 @@ HB_EXPORT BOOL hb_setGetL( HB_set_enum set_specifier ) return FALSE; } -HB_EXPORT char * hb_setGetCPtr( HB_set_enum set_specifier ) +char * hb_setGetCPtr( HB_set_enum set_specifier ) { PHB_SET_STRUCT pSet = hb_stackSetStruct(); @@ -2076,7 +2076,7 @@ HB_EXPORT char * hb_setGetCPtr( HB_set_enum set_specifier ) return FALSE; } -HB_EXPORT int hb_setGetNI( HB_set_enum set_specifier ) +int hb_setGetNI( HB_set_enum set_specifier ) { PHB_SET_STRUCT pSet = hb_stackSetStruct(); @@ -2175,328 +2175,328 @@ HB_EXPORT int hb_setGetNI( HB_set_enum set_specifier ) return FALSE; } -HB_EXPORT long hb_setGetNL( HB_set_enum set_specifier ) +long hb_setGetNL( HB_set_enum set_specifier ) { return hb_setGetNI( set_specifier ); } -HB_EXPORT HB_PATHNAMES * hb_setGetFirstSetPath( void ) +HB_PATHNAMES * hb_setGetFirstSetPath( void ) { return hb_stackSetStruct()->hb_set_path; } -HB_EXPORT HB_FHANDLE hb_setGetAltHan( void ) +HB_FHANDLE hb_setGetAltHan( void ) { return hb_stackSetStruct()->hb_set_althan; } -HB_EXPORT BOOL hb_setGetCentury( void ) +BOOL hb_setGetCentury( void ) { return hb_stackSetStruct()->hb_set_century; } -HB_EXPORT HB_FHANDLE hb_setGetExtraHan( void ) +HB_FHANDLE hb_setGetExtraHan( void ) { return hb_stackSetStruct()->hb_set_extrahan; } -HB_EXPORT HB_FHANDLE hb_setGetPrintHan( void ) +HB_FHANDLE hb_setGetPrintHan( void ) { return hb_stackSetStruct()->hb_set_printhan; } -HB_EXPORT BOOL hb_setGetAlternate( void ) +BOOL hb_setGetAlternate( void ) { return hb_stackSetStruct()->HB_SET_ALTERNATE; } -HB_EXPORT char * hb_setGetAltFile( void ) +char * hb_setGetAltFile( void ) { return hb_stackSetStruct()->HB_SET_ALTFILE; } -HB_EXPORT BOOL hb_setGetAutOpen( void ) +BOOL hb_setGetAutOpen( void ) { return hb_stackSetStruct()->HB_SET_AUTOPEN; } -HB_EXPORT int hb_setGetAutOrder( void ) +int hb_setGetAutOrder( void ) { return hb_stackSetStruct()->HB_SET_AUTORDER; } -HB_EXPORT int hb_setGetAutoShare( void ) +int hb_setGetAutoShare( void ) { return hb_stackSetStruct()->HB_SET_AUTOSHARE; } -HB_EXPORT BOOL hb_setGetBell( void ) +BOOL hb_setGetBell( void ) { return hb_stackSetStruct()->HB_SET_BELL; } -HB_EXPORT BOOL hb_setGetCancel( void ) +BOOL hb_setGetCancel( void ) { return hb_stackSetStruct()->HB_SET_CANCEL; } -HB_EXPORT char * hb_setGetColor( void ) +char * hb_setGetColor( void ) { return hb_stackSetStruct()->HB_SET_COLOR; } -HB_EXPORT BOOL hb_setGetConfirm( void ) +BOOL hb_setGetConfirm( void ) { return hb_stackSetStruct()->HB_SET_CONFIRM; } -HB_EXPORT BOOL hb_setGetConsole( void ) +BOOL hb_setGetConsole( void ) { return hb_stackSetStruct()->HB_SET_CONSOLE; } -HB_EXPORT char * hb_setGetDateFormat( void ) +char * hb_setGetDateFormat( void ) { return hb_stackSetStruct()->HB_SET_DATEFORMAT; } -HB_EXPORT BOOL hb_setGetDebug( void ) +BOOL hb_setGetDebug( void ) { return hb_stackSetStruct()->HB_SET_DEBUG; } -HB_EXPORT int hb_setGetDecimals( void ) +int hb_setGetDecimals( void ) { return hb_stackSetStruct()->HB_SET_DECIMALS; } -HB_EXPORT char * hb_setGetDefault( void ) +char * hb_setGetDefault( void ) { return hb_stackSetStruct()->HB_SET_DEFAULT; } -HB_EXPORT BOOL hb_setGetDeleted( void ) +BOOL hb_setGetDeleted( void ) { return hb_stackSetStruct()->HB_SET_DELETED; } -HB_EXPORT char * hb_setGetDelimChars( void ) +char * hb_setGetDelimChars( void ) { return hb_stackSetStruct()->HB_SET_DELIMCHARS; } -HB_EXPORT BOOL hb_setGetDelimiters( void ) +BOOL hb_setGetDelimiters( void ) { return hb_stackSetStruct()->HB_SET_DELIMITERS; } -HB_EXPORT char * hb_setGetDevice( void ) +char * hb_setGetDevice( void ) { return hb_stackSetStruct()->HB_SET_DEVICE; } -HB_EXPORT BOOL hb_setGetEOF( void ) +BOOL hb_setGetEOF( void ) { return hb_stackSetStruct()->HB_SET_EOF; } -HB_EXPORT int hb_setGetEpoch( void ) +int hb_setGetEpoch( void ) { return hb_stackSetStruct()->HB_SET_EPOCH; } -HB_EXPORT BOOL hb_setGetEscape( void ) +BOOL hb_setGetEscape( void ) { return hb_stackSetStruct()->HB_SET_ESCAPE; } -HB_EXPORT int hb_setGetEventMask( void ) +int hb_setGetEventMask( void ) { return hb_stackSetStruct()->HB_SET_EVENTMASK; } -HB_EXPORT BOOL hb_setGetExact( void ) +BOOL hb_setGetExact( void ) { return hb_stackSetStruct()->HB_SET_EXACT; } -HB_EXPORT BOOL hb_setGetExclusive( void ) +BOOL hb_setGetExclusive( void ) { return hb_stackSetStruct()->HB_SET_EXCLUSIVE; } -HB_EXPORT BOOL hb_setGetExit( void ) +BOOL hb_setGetExit( void ) { return hb_stackSetStruct()->HB_SET_EXIT; } -HB_EXPORT BOOL hb_setGetExtra( void ) +BOOL hb_setGetExtra( void ) { return hb_stackSetStruct()->HB_SET_EXTRA; } -HB_EXPORT char * hb_setGetExtraFile( void ) +char * hb_setGetExtraFile( void ) { return hb_stackSetStruct()->HB_SET_EXTRAFILE; } -HB_EXPORT BOOL hb_setGetFixed( void ) +BOOL hb_setGetFixed( void ) { return hb_stackSetStruct()->HB_SET_FIXED; } -HB_EXPORT BOOL hb_setGetIdleRepeat( void ) +BOOL hb_setGetIdleRepeat( void ) { return hb_stackSetStruct()->HB_SET_IDLEREPEAT; } -HB_EXPORT BOOL hb_setGetInsert( void ) +BOOL hb_setGetInsert( void ) { return hb_stackSetStruct()->HB_SET_INSERT; } -HB_EXPORT BOOL hb_setGetIntensity( void ) +BOOL hb_setGetIntensity( void ) { return hb_stackSetStruct()->HB_SET_INTENSITY; } -HB_EXPORT char * hb_setGetPath( void ) +char * hb_setGetPath( void ) { return hb_stackSetStruct()->HB_SET_PATH; } -HB_EXPORT int hb_setGetMargin( void ) +int hb_setGetMargin( void ) { return hb_stackSetStruct()->HB_SET_MARGIN; } -HB_EXPORT int hb_setGetMBlockSize( void ) +int hb_setGetMBlockSize( void ) { return hb_stackSetStruct()->HB_SET_MBLOCKSIZE; } -HB_EXPORT BOOL hb_setGetMCenter( void ) +BOOL hb_setGetMCenter( void ) { return hb_stackSetStruct()->HB_SET_MCENTER; } -HB_EXPORT int hb_setGetMessage( void ) +int hb_setGetMessage( void ) { return hb_stackSetStruct()->HB_SET_MESSAGE; } -HB_EXPORT char * hb_setGetMFileExt( void ) +char * hb_setGetMFileExt( void ) { return hb_stackSetStruct()->HB_SET_MFILEEXT; } -HB_EXPORT BOOL hb_setGetOptimize( void ) +BOOL hb_setGetOptimize( void ) { return hb_stackSetStruct()->HB_SET_OPTIMIZE; } -HB_EXPORT BOOL hb_setGetPrinter( void ) +BOOL hb_setGetPrinter( void ) { return hb_stackSetStruct()->HB_SET_PRINTER; } -HB_EXPORT char * hb_setGetPrintFile( void ) +char * hb_setGetPrintFile( void ) { return hb_stackSetStruct()->HB_SET_PRINTFILE; } -HB_EXPORT BOOL hb_setGetScoreBoard( void ) +BOOL hb_setGetScoreBoard( void ) { return hb_stackSetStruct()->HB_SET_SCOREBOARD; } -HB_EXPORT BOOL hb_setGetScrollBreak( void ) +BOOL hb_setGetScrollBreak( void ) { return hb_stackSetStruct()->HB_SET_SCROLLBREAK; } -HB_EXPORT BOOL hb_setGetSoftSeek( void ) +BOOL hb_setGetSoftSeek( void ) { return hb_stackSetStruct()->HB_SET_SOFTSEEK; } -HB_EXPORT BOOL hb_setGetStrictRead( void ) +BOOL hb_setGetStrictRead( void ) { return hb_stackSetStruct()->HB_SET_STRICTREAD; } -HB_EXPORT int hb_setGetTypeAhead( void ) +int hb_setGetTypeAhead( void ) { return hb_stackSetStruct()->HB_SET_TYPEAHEAD; } -HB_EXPORT BOOL hb_setGetUnique( void ) +BOOL hb_setGetUnique( void ) { return hb_stackSetStruct()->HB_SET_UNIQUE; } -HB_EXPORT int hb_setGetFileCase( void ) +int hb_setGetFileCase( void ) { return hb_stackSetStruct()->HB_SET_FILECASE; } -HB_EXPORT int hb_setGetDirCase( void ) +int hb_setGetDirCase( void ) { return hb_stackSetStruct()->HB_SET_DIRCASE; } -HB_EXPORT int hb_setGetDirSeparator( void ) +int hb_setGetDirSeparator( void ) { return hb_stackSetStruct()->HB_SET_DIRSEPARATOR; } -HB_EXPORT int hb_setGetVideoMode( void ) +int hb_setGetVideoMode( void ) { return hb_stackSetStruct()->HB_SET_VIDEOMODE; } -HB_EXPORT BOOL hb_setGetWrap( void ) +BOOL hb_setGetWrap( void ) { return hb_stackSetStruct()->HB_SET_WRAP; } -HB_EXPORT int hb_setGetDBFLockScheme( void ) +int hb_setGetDBFLockScheme( void ) { return hb_stackSetStruct()->HB_SET_DBFLOCKSCHEME; } -HB_EXPORT BOOL hb_setGetHardCommit( void ) +BOOL hb_setGetHardCommit( void ) { return hb_stackSetStruct()->HB_SET_HARDCOMMIT; } -HB_EXPORT BOOL hb_setGetForceOpt( void ) +BOOL hb_setGetForceOpt( void ) { return hb_stackSetStruct()->HB_SET_FORCEOPT; } -HB_EXPORT BOOL hb_setGetDefExtension( void ) +BOOL hb_setGetDefExtension( void ) { return hb_stackSetStruct()->HB_SET_DEFEXTENSIONS; } -HB_EXPORT char * hb_setGetEOL( void ) +char * hb_setGetEOL( void ) { return hb_stackSetStruct()->HB_SET_EOL; } -HB_EXPORT BOOL hb_setGetTrimFileName( void ) +BOOL hb_setGetTrimFileName( void ) { return hb_stackSetStruct()->HB_SET_TRIMFILENAME; } -HB_EXPORT char * hb_setGetHBOUTLOG( void ) +char * hb_setGetHBOUTLOG( void ) { return hb_stackSetStruct()->HB_SET_HBOUTLOG; } -HB_EXPORT char * hb_setGetHBOUTLOGINFO( void ) +char * hb_setGetHBOUTLOGINFO( void ) { return hb_stackSetStruct()->HB_SET_HBOUTLOGINFO; } diff --git a/harbour/source/vm/vm.c b/harbour/source/vm/vm.c index 3b8279d56f..852305c339 100644 --- a/harbour/source/vm/vm.c +++ b/harbour/source/vm/vm.c @@ -57,7 +57,7 @@ #include "hbapi.h" -HB_EXPORT HB_VMHANDLE hb_xvalloc( ULONG nSize, USHORT nFlags ) +HB_VMHANDLE hb_xvalloc( ULONG nSize, USHORT nFlags ) { /* TODO */ HB_SYMBOL_UNUSED( nSize ); @@ -65,13 +65,13 @@ HB_EXPORT HB_VMHANDLE hb_xvalloc( ULONG nSize, USHORT nFlags ) return 0; } -HB_EXPORT void hb_xvfree( HB_VMHANDLE h ) +void hb_xvfree( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); } -HB_EXPORT HB_VMHANDLE hb_xvrealloc( HB_VMHANDLE h, ULONG nSize, USHORT nFlags ) +HB_VMHANDLE hb_xvrealloc( HB_VMHANDLE h, ULONG nSize, USHORT nFlags ) { /* TODO */ HB_SYMBOL_UNUSED( h ); @@ -80,14 +80,14 @@ HB_EXPORT HB_VMHANDLE hb_xvrealloc( HB_VMHANDLE h, ULONG nSize, USHORT nFlags ) return 0; } -HB_EXPORT void * hb_xvlock( HB_VMHANDLE h ) +void * hb_xvlock( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); return NULL; } -HB_EXPORT void hb_xvunlock( HB_VMHANDLE h ) +void hb_xvunlock( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); @@ -95,14 +95,14 @@ HB_EXPORT void hb_xvunlock( HB_VMHANDLE h ) /* Wire */ -HB_EXPORT void * hb_xvwire( HB_VMHANDLE h ) +void * hb_xvwire( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); return NULL; } -HB_EXPORT void hb_xvunwire( HB_VMHANDLE h ) +void hb_xvunwire( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); @@ -111,14 +111,14 @@ HB_EXPORT void hb_xvunwire( HB_VMHANDLE h ) /* State */ -HB_EXPORT ULONG hb_xvlockcount( HB_VMHANDLE h ) +ULONG hb_xvlockcount( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); return 0; } -HB_EXPORT ULONG hb_xvsize( HB_VMHANDLE h ) +ULONG hb_xvsize( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); @@ -127,20 +127,20 @@ HB_EXPORT ULONG hb_xvsize( HB_VMHANDLE h ) /* Heap */ -HB_EXPORT HB_VMHANDLE hb_xvheapnew( ULONG nSize ) +HB_VMHANDLE hb_xvheapnew( ULONG nSize ) { /* TODO */ HB_SYMBOL_UNUSED( nSize ); return 0; } -HB_EXPORT void hb_xvheapdestroy( HB_VMHANDLE h ) +void hb_xvheapdestroy( HB_VMHANDLE h ) { /* TODO */ HB_SYMBOL_UNUSED( h ); } -HB_EXPORT HB_VMHANDLE hb_xvheapresize( HB_VMHANDLE h, ULONG nSize ) +HB_VMHANDLE hb_xvheapresize( HB_VMHANDLE h, ULONG nSize ) { /* TODO */ HB_SYMBOL_UNUSED( h ); @@ -148,7 +148,7 @@ HB_EXPORT HB_VMHANDLE hb_xvheapresize( HB_VMHANDLE h, ULONG nSize ) return 0; } -HB_EXPORT ULONG hb_xvheapalloc( HB_VMHANDLE h, ULONG nSize ) +ULONG hb_xvheapalloc( HB_VMHANDLE h, ULONG nSize ) { /* TODO */ HB_SYMBOL_UNUSED( h ); @@ -156,14 +156,14 @@ HB_EXPORT ULONG hb_xvheapalloc( HB_VMHANDLE h, ULONG nSize ) return 0; } -HB_EXPORT void hb_xvheapfree( HB_VMHANDLE h, ULONG nOffset ) +void hb_xvheapfree( HB_VMHANDLE h, ULONG nOffset ) { /* TODO */ HB_SYMBOL_UNUSED( h ); HB_SYMBOL_UNUSED( nOffset ); } -HB_EXPORT void * hb_xvheaplock( HB_VMHANDLE h, ULONG nOffset ) +void * hb_xvheaplock( HB_VMHANDLE h, ULONG nOffset ) { /* TODO */ HB_SYMBOL_UNUSED( h ); @@ -171,7 +171,7 @@ HB_EXPORT void * hb_xvheaplock( HB_VMHANDLE h, ULONG nOffset ) return NULL; } -HB_EXPORT void hb_xvheapunlock( HB_VMHANDLE h, ULONG nOffset ) +void hb_xvheapunlock( HB_VMHANDLE h, ULONG nOffset ) { /* TODO */ HB_SYMBOL_UNUSED( h );