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

2002-07-17 12:55 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>

Browse Source
This commit is contained in:
Alexander S.Kresin
2002-07-17 08:44:59 +00:00
parent 74f3158cb1
commit f65aa1c2fe
2 changed files with 15 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
harbour/ChangeLog
View File

@@ -8,6 +8,9 @@
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2002-07-17 12:55 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
* source/pp/ppcore.c
! Bug fixed, related to #define f ..., #define t ... and .T., .F.
2002-07-17 12:30 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
* source/debug/debugger.prg

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

@@ -3715,6 +3715,18 @@ static int NextName( char ** sSource, char * sDest )
continue;
}
/* End - Ron Pinkas added 2001-02-21 */
else if( (*sSource)[0] == '.' && toupper( (*sSource)[1] ) == 'T' && (*sSource)[2] == '.' )
{
(*sSource) += 3;
cLastChar = ' ';
continue;
}
else if( (*sSource)[0] == '.' && toupper( (*sSource)[1] ) == 'F' && (*sSource)[2] == '.' )
{
(*sSource) += 3;
cLastChar = ' ';
continue;
}
else if( **sSource == '\'' )
{
/* Ron Pinkas added 2000-11-08 */