From f65aa1c2fedf4aad939700eab9a96251ebdc6a9e Mon Sep 17 00:00:00 2001 From: "Alexander S.Kresin" Date: Wed, 17 Jul 2002 08:44:59 +0000 Subject: [PATCH] 2002-07-17 12:55 UTC+0300 Alexander Kresin --- harbour/ChangeLog | 3 +++ harbour/source/pp/ppcore.c | 12 ++++++++++++ 2 files changed, 15 insertions(+) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 926c1ab172..892929a9a0 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,9 @@ 2002-12-01 23:12 UTC+0100 Foo Bar */ +2002-07-17 12:55 UTC+0300 Alexander Kresin + * source/pp/ppcore.c + ! Bug fixed, related to #define f ..., #define t ... and .T., .F. 2002-07-17 12:30 UTC+0300 Alexander Kresin * source/debug/debugger.prg diff --git a/harbour/source/pp/ppcore.c b/harbour/source/pp/ppcore.c index be412fbc8d..554a97cb2d 100644 --- a/harbour/source/pp/ppcore.c +++ b/harbour/source/pp/ppcore.c @@ -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 */