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

ChangeLog 2000-08-09 14:15 UTC+0100

Browse Source
This commit is contained in:
Ryszard Glab
2000-08-09 12:17:01 +00:00
parent 6b951cdac9
commit 283b555df8
2 changed files with 66 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -1,3 +1,8 @@
2000-08-09 14:15 UTC+0100 Ryszard Glab <rglab@imid.med.pl>
*source/compiler/harbour.slx
* fixed to work with current syntax rules in harbour.y
2000-08-09 07:10 GMT-3 Luiz Rafael Culik <culik@sl.conex.net>
*doc/en/sayget.txt
*doc/en/file.txt

62
harbour/source/compiler/harbour.slx
View File

@@ -1176,7 +1176,7 @@ int hb_lex_CustomAction( int x, int iWordLen, int aiHold[], int *ptr_iHold, BOOL
if( hb_comp_wForCounter == 0 && hb_comp_wWhileCounter == 0 )
hb_compGenError( hb_comp_szErrors, 'E', HB_COMP_ERR_UNMATCHED_EXIT, "EXIT", NULL );
x = EXITLOOP;
x = EXIT;
break;
case HB_CHK_LOOP :
@@ -1441,6 +1441,66 @@ int hb_lex_CustomAction( int x, int iWordLen, int aiHold[], int *ptr_iHold, BOOL
sIdentifier[iWordLen] = '\0';
x = IDENTIFIER;
break;
case OPTIONAL :
strncpy( (char*) sIdentifier, "OPTIONAL" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case EXTERN :
strncpy( (char*) sIdentifier, "EXTERNAL" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case ANNOUNCE :
strncpy( (char*) sIdentifier, "ANNOUNCE" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case LOCAL :
strncpy( (char*) sIdentifier, "LOCAL" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case MEMVAR :
strncpy( (char*) sIdentifier, "MEMVAR" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case STATIC :
strncpy( (char*) sIdentifier, "STATIC" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case PRIVATE :
strncpy( (char*) sIdentifier, "PRIVATE" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case PUBLIC :
strncpy( (char*) sIdentifier, "PUBLIC" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case PARAMETERS :
strncpy( (char*) sIdentifier, "PARAMETERS" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case PROCREQ :
strncpy( (char*) sIdentifier, "PROCREQ" , iWordLen );
sIdentifier[iWordLen] = '\0';
yylval.string = hb_compIdentifierNew( (char*) sIdentifier, TRUE );
break;
case HB_IN_ID :
strcpy( (char*) sIdentifier, "IN" );