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

ChangeLog 19990919-15:45 GMT+2

Browse Source
This commit is contained in:
Ryszard Glab
1999-09-19 13:50:10 +00:00
parent 0680266d6d
commit 96bec69f72
2 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -1,3 +1,8 @@
19990919-15:45 GMT+2 Ryszard Glab <rglab@imid.med.pl>
*source/vm/hvm.c
* added checking if starting symbol name points to a function
19990919-14:25 GMT+2 Ryszard Glab <rglab@imid.med.pl>
*soource/rtl/console.c

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

@@ -201,14 +201,14 @@ int main( int argc, char * argv[] )
{
PHB_DYNS pDynSym = hb_dynsymFind( "_APPMAIN" );
if( pDynSym )
if( pDynSym && pDynSym->pSymbol->pFunPtr )
s_pSymStart = pDynSym->pSymbol;
#ifdef HARBOUR_START_PROCEDURE
else
{
pDynSym = hb_dynsymFind( HARBOUR_START_PROCEDURE );
if( pDynSym )
if( pDynSym && pDynSym->pSymbol->pFunPtr )
s_pSymStart = pDynSym->pSymbol;
else
hb_errInternal( 9999, "Can\'t locate the starting procedure: \'%s\'", HARBOUR_START_PROCEDURE, NULL );