d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Previous version saw C_INSTR CONDITION as CALL ( e.g. C_asp ( $1 == 1) ).

Browse source
This commit is contained in:
kaashoek 1988-02-03 10:47:08 +00:00
parent e8f2566542
commit 474b2eb453
1 changed files with 17 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
util/ceg/EM_parser/common/mylex.c
View file

@ -40,6 +40,9 @@ int CD_pos = FALSE; /* 'CD_pos' is used as a flag to signal if it is
* This flag is needed because CALL is a subset of
* CONDITION.
*/
int CALL_pos = FALSE; /* Needed to distinguish between
* C_INSTR CONDITION and CALL
*/
@ -65,6 +68,7 @@ int mylex()
*/
if ( special)
CD_pos = TRUE;
CALL_pos = FALSE;
return( '.');
}
break;
@ -73,12 +77,14 @@ int mylex()
case '=' : if ( arrow()) {
CD_pos = FALSE;
CALL_pos = TRUE;
return( ARROW);
}
break;
case ':' : if ( equiv()) {
CD_pos = FALSE;
CALL_pos = TRUE;
return( EQUIV);
}
break;
@ -102,6 +108,7 @@ int mylex()
}
if ( isalpha( c)) {
read_ident();
if ( CALL_pos) {
c = skip_space();
if ( c == '(') {
*next++ = c;
@ -110,6 +117,10 @@ int mylex()
}
else {
backc( c);
return( ERROR);
}
}
else {
if ( is_DEF_C_INSTR( yytext)) {
CD_pos = TRUE;
return( DEF_C_INSTR);