From 8175b9bd79bf02cb0db0c6f40e0ae782ddfa7101 Mon Sep 17 00:00:00 2001 From: Antonio Linares Date: Thu, 16 Sep 1999 08:48:18 +0000 Subject: [PATCH] *** empty log message *** --- harbour/source/compiler/harbour.y | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) diff --git a/harbour/source/compiler/harbour.y b/harbour/source/compiler/harbour.y index c227067199..2cad05e639 100644 --- a/harbour/source/compiler/harbour.y +++ b/harbour/source/compiler/harbour.y @@ -773,6 +773,7 @@ IncDec : INC { $$ = 1; } Variable : VarId {} | VarAt { GenPCode1( HB_P_ARRAYAT ); } + | Array ArrayIndex { GenPCode1( HB_P_ARRAYAT ); } | FunCallArray { GenPCode1( HB_P_ARRAYAT ); } | ObjectData {} | ObjectData ArrayIndex { GenPCode1( HB_P_ARRAYAT ); } @@ -1488,7 +1489,20 @@ int harbour_main( int argc, char * argv[] ) case 'i': case 'I': - AddSearchPath( argv[ iArg ] + 2, &_pIncludePath ); + { + char * pPath; + char * pDelim; + char * szInclude; + + pPath = szInclude = yy_strdup( argv[ iArg ] + 2 ); + while( ( pDelim = strchr( pPath, OS_PATH_LIST_SEPARATOR ) ) != NULL ) + { + * pDelim = '\0'; + AddSearchPath( pPath, &_pIncludePath ); + pPath = pDelim + 1; + } + AddSearchPath( pPath, &_pIncludePath ); + } break; case 'l':