[Commit] nickle ChangeLog,1.30,1.31 lex.l,1.71,1.72

[Bart Massey]

Committed by: bart

Update of /local/src/CVS/nickle
In directory home.keithp.com:/tmp/cvs-serv1113

Modified Files:
	ChangeLog lex.l 
Log Message:
Allow identifiers to start with "_".



Index: ChangeLog
===================================================================
RCS file: /local/src/CVS/nickle/ChangeLog,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -d -r1.30 -r1.31
--- a/ChangeLog	15 Apr 2004 05:37:36 -0000	1.30
+++ b/ChangeLog	16 Apr 2004 03:37:12 -0000	1.31
@@ -1,3 +1,8 @@
+2004-04-15  Bart Massey  <bart at cs.pdx.edu>
+
+	* lex.l:
+	Allow identifiers to start with "_".
+
 2004-04-14  Bart Massey  <bart at cs.pdx.edu>
 
 	reviewed by: Keith Packard <keithp at keithp.com>

Index: lex.l
===================================================================
RCS file: /local/src/CVS/nickle/lex.l,v
retrieving revision 1.71
retrieving revision 1.72
diff -u -d -r1.71 -r1.72
--- a/lex.l	11 Apr 2004 06:06:52 -0000	1.71
+++ b/lex.l	16 Apr 2004 03:37:12 -0000	1.72
@@ -543,7 +543,7 @@
 		yylval.value = aetov (yytext, 10);
 		return TEN_FLOAT;
 		}
-[a-zA-Z][0-9a-zA-Z_]* {
+[a-zA-Z_][0-9a-zA-Z_]* {
 	        CommandPtr	c;
 		SymbolPtr	symbol;
 		yylval.atom = AtomId (yytext);