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

Tweaked to allow _ as a leading character in identifier names (if

Browse source 
use of underscores in identifiers has been turned on).
This commit is contained in:
dtrg 2007-02-20 00:40:00 +00:00
parent e4292486a3
commit 39689a4de9
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lang/pc/comp/LLlex.c
View file

@ -418,7 +418,14 @@ again:
if( ch == EOI ) eofseen = 1; if( ch == EOI ) eofseen = 1;
else PushBack(); else PushBack();
/* dtrg: removed to allow Pascal programs to access system routines
* (necessary to make them do anything useful). What's this for,
* anyway? */
#if 0
if( buf[0] == '_' ) lexerror("underscore starts identifier"); if( buf[0] == '_' ) lexerror("underscore starts identifier");
#endif
tk->TOK_IDF = id = str2idf(buf, 1); tk->TOK_IDF = id = str2idf(buf, 1);
return tk->tk_symb = id->id_reserved ? id->id_reserved : IDENT; return tk->tk_symb = id->id_reserved ? id->id_reserved : IDENT;
} }