version 1.2, 1996/06/26 05:37:38 |
version 1.3, 1996/07/19 21:57:32 |
|
|
if (s == NULL || *s == '\0') |
if (s == NULL || *s == '\0') |
return; |
return; |
|
|
if ((which & E_VARS) && (cp = index(s, '$')) != NULL) { |
if ((which & E_VARS) && (cp = strchr(s, '$')) != NULL) { |
*cp++ = '\0'; |
*cp++ = '\0'; |
if (*cp == '\0') { |
if (*cp == '\0') { |
yyerror("no variable name after '$'"); |
yyerror("no variable name after '$'"); |
|
|
} |
} |
if (*cp == LC) { |
if (*cp == LC) { |
cp++; |
cp++; |
if ((tail = index(cp, RC)) == NULL) { |
if ((tail = strchr(cp, RC)) == NULL) { |
yyerror("unmatched '{'"); |
yyerror("unmatched '{'"); |
return; |
return; |
} |
} |