* rclex.l: Allow underscores at the start of identifiers.

diff --git a/binutils/ChangeLog b/binutils/ChangeLog
index 9548cc8..d18d20d 100644 (file)
--- a/binutils/ChangeLog
+++ b/binutils/ChangeLog
@@ -1,3 +1,7 @@
+2007-04-20  Nick Clifton  <nickc@redhat.com>
+
+       * rclex.l: Allow underscores at the start of identifiers.
+
 2007-04-19  Alan Modra  <amodra@bigpond.net.au>
 
        * budemang.c: Delete.

diff --git a/binutils/rclex.l b/binutils/rclex.l
index 92b1ec7..f5ca8d8 100644 (file)
--- a/binutils/rclex.l
+++ b/binutils/rclex.l
@@ -217,7 +217,7 @@ static char *get_string (int);
                            }
                        }
 
-[A-Za-z][^ ,\t\r\n]*   {
+[_A-Za-z][^ ,\t\r\n]*  {
                          char *s;
 
                          /* I rejected comma in a string in order to