2018-01-05 15:38 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* src/compiler/complex.c
* pacified warning and removed commented debug code I committed by mistake
This commit is contained in:
@@ -7,6 +7,10 @@
|
||||
Entries may not always be in chronological/commit order.
|
||||
See license at the end of file. */
|
||||
|
||||
2018-01-05 15:38 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
|
||||
* src/compiler/complex.c
|
||||
* pacified warning and removed commented debug code I committed by mistake
|
||||
|
||||
2018-01-05 14:12 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
|
||||
* include/hbapiitm.h
|
||||
* src/rtl/hbdef.c
|
||||
|
||||
@@ -498,7 +498,6 @@ static int hb_comp_funcStart( HB_COMP_DECL, YYSTYPE * yylval_ptr )
|
||||
HB_COMP_PARAM->functions.pLast->wWithObjectCnt =
|
||||
HB_COMP_PARAM->functions.pLast->wSeqBegCounter = 0;
|
||||
HB_COMP_PARAM->functions.pLast->wSeqCounter = 0;
|
||||
// printf( "\nEX=%d, iClose=%d => ENDERR", ( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK ) != 0, HB_COMP_PARAM->pLex->iClose );
|
||||
return ENDERR;
|
||||
}
|
||||
yylval_ptr->iNumber = HB_COMP_PARAM->pLex->iScope;
|
||||
@@ -524,18 +523,15 @@ int hb_comp_yylex( YYSTYPE * yylval_ptr, HB_COMP_DECL )
|
||||
{
|
||||
if( --pLex->iClose == 0 )
|
||||
{
|
||||
// printf( "\nEX=%d, iClose=%d => %s\n", ( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK ) != 0, HB_COMP_PARAM->pLex->iClose, HB_COMP_PARAM->pLex->lasttok );
|
||||
yylval_ptr->iNumber = pLex->iScope;
|
||||
return pLex->iState;
|
||||
}
|
||||
if( pLex->iClose == 1 && HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK )
|
||||
{
|
||||
pLex->iClose = -1;
|
||||
// printf( "\nEX=%d, iClose=%d => ;\n", ( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK ) != 0, HB_COMP_PARAM->pLex->iClose );
|
||||
return ';';
|
||||
}
|
||||
// printf( "\nEX=%d, iClose=%d => %s", ( HB_COMP_PARAM->functions.pLast->funFlags & HB_FUNF_EXTBLOCK ) != 0, HB_COMP_PARAM->pLex->iClose, pLex->iClose & 1 ? ";" : "ENDERR" );
|
||||
return pLex->iClose & 1 ? ';' : ENDERR;
|
||||
return ( pLex->iClose & 1 ) ? ';' : ( int ) ENDERR;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user