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

diff --git a/binutils/ChangeLog b/binutils/ChangeLog
index 9548cc80f7bad7be8d43a1fc2a425dc51b219816..d18d20d4d41056ca7a8608e3dcf3124bc17bda30 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 92b1ec738526786bed9088739bed5e69bd682f10..f5ca8d803af7d89b369aa670ac6c3967b1d5984e 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