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

2007-05-11 18:34 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* harbour/source/compiler/hbmain.c
   * harbour/source/compiler/harbour.yyc
     ! Fixed error message text when unclosed multiline codeblock
       was detected (said: <||...> instead of {||...}).
       (two more places)
This commit is contained in:
Viktor Szakats
2007-05-12 22:32:08 +00:00
parent 9151c5472e
commit cbbcb1217f
3 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
harbour/ChangeLog
View File

@@ -8,6 +8,13 @@
2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2007-05-11 18:34 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* harbour/source/compiler/hbmain.c
* harbour/source/compiler/harbour.yyc
! Fixed error message text when unclosed multiline codeblock
was detected (said: <||...> instead of {||...}).
(two more places)
2007-05-11 18:24 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* harbour/source/compiler/harbour.y
! Fixed error message text when unclosed multiline codeblock

2
harbour/source/compiler/harbour.yyc
View File

@@ -7959,7 +7959,7 @@ BOOL hb_compCheckUnclosedStru( HB_COMP_DECL )
else if( HB_COMP_PARAM->functions.pLast &&
( HB_COMP_PARAM->functions.pLast->bFlags & FUN_EXTBLOCK ) )
{
hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_UNCLOSED_STRU, "<||...>", NULL );
hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_UNCLOSED_STRU, "{||...}", NULL );
}
else
fUnclosed = FALSE;

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

@@ -3829,7 +3829,7 @@ void hb_compCodeBlockEnd( HB_COMP_DECL )
{
if( HB_COMP_PARAM->iWarnings >= 1 )
hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_FUN_WITH_NO_RETURN,
"<||...>", NULL );
"{||...}", NULL );
/* finish the codeblock without popping the return value from HVM stack */
hb_compGenPCode1( HB_P_ENDPROC, HB_COMP_PARAM );
}
@@ -3951,7 +3951,7 @@ void hb_compCodeBlockEnd( HB_COMP_DECL )
while( pVar )
{
if( HB_COMP_PARAM->iWarnings && pFunc->szName && pVar->szName && ! ( pVar->iUsed & VU_USED ) )
hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_VAR_NOT_USED, pVar->szName, "<||...>" );
hb_compGenWarning( HB_COMP_PARAM, hb_comp_szWarnings, 'W', HB_COMP_WARN_VAR_NOT_USED, pVar->szName, "{||...}" );
pVar = pVar->pNext;
}
}