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

2009-09-02 16:52 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/source/vm/runner.c
    ! fixed possible GPF after loading .hrb module - clear function
      address if dynamic symbol does not exist

  * harbour/source/compiler/hbmain.c
    ! fixed typo in conditional compilation in last commit
This commit is contained in:
Przemyslaw Czerpak
2009-09-02 14:52:49 +00:00
parent 388dcfbd18
commit 1e6d651849
3 changed files with 12 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
harbour/ChangeLog
View File

@@ -17,6 +17,14 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-09-02 16:52 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/vm/runner.c
! fixed possible GPF after loading .hrb module - clear function
address if dynamic symbol does not exist
* harbour/source/compiler/hbmain.c
! fixed typo in conditional compilation in last commit
2009-09-02 14:08 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbcomp.h
* harbour/include/hbcompdf.h

4
harbour/source/compiler/hbmain.c
View File

@@ -4002,9 +4002,9 @@ static int hb_compCompile( HB_COMP_DECL, const char * szPrg, const char * szBuff
hb_compExternGen( HB_COMP_PARAM );
}
else
#else
HB_COMP_PARAM->iModulesCount = 1;
#endif
HB_COMP_PARAM->iModulesCount = 1;
HB_COMP_PARAM->currLine = 1;
HB_COMP_PARAM->currModule = hb_compIdentifierNew(
HB_COMP_PARAM, szFileName, HB_IDENT_COPY );

2
harbour/source/vm/runner.c
View File

@@ -461,6 +461,8 @@ static PHRB_BODY hb_hrbLoad( const char * szHrbBody, ULONG ulBodySize, USHORT us
/* External function */
if( pSymRead[ ul ].value.pCodeFunc == ( PHB_PCODEFUNC ) SYM_EXTERN )
{
pSymRead[ ul ].value.pCodeFunc = NULL;
pDynSym = hb_dynsymFind( pSymRead[ ul ].szName );
if( pDynSym )