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

See ChangeLog entry 2000-10-02 12:45 UTC-0400 David G. Holm <dholm@jsd-llc.com>

Browse Source
This commit is contained in:
David G. Holm
2000-10-02 17:05:19 +00:00
parent e7d57ae81a
commit e2d7174201
2 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -1,3 +1,8 @@
2000-10-02 12:45 UTC-0400 David G. Holm <dholm@jsd-llc.com>
* source/pp/ppcore.c
! The include file limit check now uses hb_comp_files.iFiles
instead of the static variable that never got decremented.
2000-10-01 18:25 GMT+2 Maurilio Longo <maurilio.longo@libero.it>
*source/rtl/tbrowse.prg
! PageDown() and GoBottom() methods weren't working when number of available record was lower than

6
harbour/source/pp/ppcore.c
View File

@@ -148,7 +148,6 @@ static BOOL s_bReplacePat;
static int s_numBrackets;
static char s_groupchar;
static char s_prevchar;
static int s_iIncludes = 0;
int hb_pp_nEmptyStrings;
int * hb_pp_aCondCompile = NULL;
@@ -337,7 +336,6 @@ void hb_pp_Init( void )
s_maxCondCompile = 5;
s_bReplacePat = TRUE;
s_prevchar = 'A';
s_iIncludes = 0;
if( !hb_pp_aCondCompile )
hb_pp_aCondCompile = ( int * ) hb_xgrab( sizeof( int ) * 5 );
@@ -2940,10 +2938,8 @@ static BOOL OpenInclude( char * szFileName, PATHNAMES * pSearch, PHB_FNAME pMain
HB_TRACE(HB_TR_DEBUG, ("OpenInclude(%s, %p, %p, %p, %d)", szFileName, pSearch, pMainFileName, fptr, (int) bStandardOnly));
if( s_iIncludes > HB_PP_MAX_INCLUDES )
if( hb_comp_files.iFiles >= HB_PP_MAX_INCLUDES )
hb_compGenError( hb_pp_szErrors, 'F', HB_PP_ERR_TOO_MANY_INCLUDES, szFileName, NULL );
else
s_iIncludes++;
if( bStandardOnly )
{