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

2007-03-01 05:22 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/source/pp/ppcore.c
    ! fixed comments like /*/*/
This commit is contained in:
Przemyslaw Czerpak
2007-03-01 04:22:57 +00:00
parent 01c55fa2c1
commit 425dfbe58e
2 changed files with 11 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -8,6 +8,10 @@
2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2007-03-01 05:22 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/pp/ppcore.c
! fixed comments like /*/*/
2007-03-01 01:55 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbclass.ch
* cleaned scope error message

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

@@ -847,7 +847,10 @@ static void hb_pp_getLine( PHB_PP_STATE pState )
case HB_PP_INLINE_COMMENT:
if( ulLen > 1 && ch == '*' && pBuffer[ 1 ] == '/' )
{
pState->iInLineState = HB_PP_INLINE_OFF;
++ul;
}
break;
default:
@@ -865,7 +868,10 @@ static void hb_pp_getLine( PHB_PP_STATE pState )
else if( ulLen > 1 )
{
if( ch == '/' && pBuffer[ 1 ] == '*' )
{
pState->iInLineState = HB_PP_INLINE_COMMENT;
++ul;
}
else if( ch == '/' && pBuffer[ 1 ] == '/' )
ulLen = ul = 0;
}
@@ -1028,6 +1034,7 @@ static void hb_pp_getLine( PHB_PP_STATE pState )
hb_pp_tokenAddCmdSep( pState );
#endif
pState->iStreamDump = HB_PP_STREAM_COMMENT;
ul += 2;
}
else if( ch == ' ' || ch == '\t' )
{