From 0c2baf425c446535c970f13cb9e3011422be63d0 Mon Sep 17 00:00:00 2001 From: Antonio Linares Date: Tue, 19 Feb 2002 09:20:55 +0000 Subject: [PATCH] minor fix borrowed from [x]Harbour --- harbour/source/pp/ppcore.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/harbour/source/pp/ppcore.c b/harbour/source/pp/ppcore.c index e6cd8b43c4..2955b561d7 100644 --- a/harbour/source/pp/ppcore.c +++ b/harbour/source/pp/ppcore.c @@ -763,6 +763,9 @@ static void ParseCommand( char * sLine, BOOL com_or_xcom, BOOL com_or_tra ) /* Ron Pinkas added 2000-01-24 */ if( ! ISNAME( *sLine ) ) { + if( *sLine == '[' && ipos ) + break; + if( IS_2CHAR_OPERATOR( sLine ) ) { *(cmdname+ipos++) = *sLine++; @@ -990,7 +993,7 @@ static void ConvertPatterns( char * mpatt, int mlen, char * rpatt, int rlen ) { ptr += rmlen++; while( *ptr != '\0' && *ptr != '>' && *(ptr-1) != '\\' ) - { + { if( *ptr != ' ' && *ptr != '\t' && *ptr != '\"' && *ptr != ')' && *ptr != '}' && *ptr != '.' && *ptr != '-' ) { ifou = -1; @@ -3964,4 +3967,4 @@ void CloseInclude( void ) if( hb_comp_files.pLast ) hb_comp_iLine = hb_comp_files.pLast->iLine; hb_comp_files.iFiles--; -} +} \ No newline at end of file