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

2009-06-30 18:04 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/include/hbtypes.h
  * harbour/source/vm/maindllp.c
    * cleaned prototype names for hb_vmProcessSymbols() and hb_vmExecute()
This commit is contained in:
Przemyslaw Czerpak
2009-06-30 16:04:36 +00:00
parent 32911690c4
commit 0a2ccc50f1
3 changed files with 9 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -17,6 +17,11 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-06-30 18:04 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbtypes.h
* harbour/source/vm/maindllp.c
* cleaned prototype names for hb_vmProcessSymbols() and hb_vmExecute()
2009-06-30 17:45 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* bin/postinst.bat
* Force English language hbmk2 in Harbour build.

6
harbour/include/hbtypes.h
View File

@@ -62,13 +62,11 @@
HB_EXTERN_BEGIN
typedef PHB_SYMB ( * VM_PROCESS_DLL_SYMBOLS ) ( PHB_SYMB pModuleSymbols,
USHORT uiModuleSymbols );
typedef PHB_SYMB ( * VM_PROCESS_SYMBOLS_EX )
typedef PHB_SYMB ( * VM_PROCESS_SYMBOLS )
( PHB_SYMB pModuleSymbols, USHORT uiModuleSymbols,
const char * szModuleName, ULONG ulID, USHORT uiPcodeVer );
typedef void ( * VM_DLL_EXECUTE ) ( const BYTE * pCode, PHB_SYMB pSymbols );
typedef void ( * VM_EXECUTE ) ( const BYTE * pCode, PHB_SYMB pSymbols );
typedef BOOL ( * EXT_IS_ARRAY ) ( int iParam );
typedef char * ( * EXT_PARC1 ) ( int iParam );

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

@@ -156,7 +156,7 @@ PHB_SYMB hb_vmProcessSymbols( PHB_SYMB pSymbols, USHORT uiSymbols, const char *
s_pProcessSymbols = hb_getProcAddress( HBTEXT( "_hb_vmProcessDynLibSymbols" ) );
if( s_pProcessSymbols )
return ( ( VM_PROCESS_SYMBOLS_EX ) s_pProcessSymbols )
return ( ( VM_PROCESS_SYMBOLS ) s_pProcessSymbols )
( pSymbols, uiSymbols, szModuleName, ulID, uiPcodeVer );
/* else
* may we issue an error ? */
@@ -173,7 +173,7 @@ void hb_vmExecute( const BYTE * pCode, PHB_SYMB pSymbols )
s_pExecute = hb_getProcAddress( HBTEXT( "_hb_vmExecute" ) );
if( s_pExecute )
( ( VM_DLL_EXECUTE ) s_pExecute )( pCode, pSymbols );
( ( VM_EXECUTE ) s_pExecute )( pCode, pSymbols );
/* else
* may we issue an error ? */