* config/tc-sh.c (parse_reg): Match capital MACH and MACL.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index c67b49f..583adcf 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,7 @@
+2001-03-15  Alexandre Oliva  <aoliva@redhat.com>
+
+       * config/tc-sh.c (parse_reg): Match capital MACH and MACL.
+
 2001-03-15  DJ Delorie  <dj@redhat.com>
 
        * stabs.c (s_stab_generic): Don't corrupt the notes obstack by

diff --git a/gas/config/tc-sh.c b/gas/config/tc-sh.c
index 69dbf75..b1a51e6 100644 (file)
--- a/gas/config/tc-sh.c
+++ b/gas/config/tc-sh.c
@@ -694,12 +694,12 @@ parse_reg (src, mode, reg)
   if (l0 == 'm' && l1 == 'a' && tolower (src[2]) == 'c'
       && ! IDENT_CHAR ((unsigned char) src[4]))
     {
-      if (src[3] == 'l')
+      if (tolower (src[3]) == 'l')
        {
          *mode = A_MACL;
          return 4;
        }
-      if (src[3] == 'h')
+      if (tolower (src[3]) == 'h')
        {
          *mode = A_MACH;
          return 4;