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

identifiers may not contain two consecutive underscores, and a fix

Browse source
This commit is contained in:
ceriel 1988-03-31 16:02:20 +00:00
parent 92f28ae164
commit 702a73b734
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lang/m2/comp/LLlex.c
View file

@ -348,6 +348,9 @@ again:
register t_idf *id; register t_idf *id;
do { do {
if (ch == '_' && *tag == '_') {
lexerror("an identifier may not contain two consecutive underscores");
}
if (tag - buf < idfsize) *tag++ = ch; if (tag - buf < idfsize) *tag++ = ch;
LoadChar(ch); LoadChar(ch);
} while(in_idf(ch)); } while(in_idf(ch));
@ -356,7 +359,7 @@ again:
else PushBack(); else PushBack();
*tag = '\0'; *tag = '\0';
if (*(tag - 1) == '_') { if (*(tag - 1) == '_') {
lexerror("last character of an identifier may not be a '_'"); lexerror("last character of an identifier may not be an underscore");
} }
tk->TOK_IDF = id = str2idf(buf, 1); tk->TOK_IDF = id = str2idf(buf, 1);