From 1000a02a2944998f22cae7fd82bff701f161f69a Mon Sep 17 00:00:00 2001
From: Nick Clifton <nickc@redhat.com>
Date: Thu, 29 Nov 2001 09:41:34 +0000
Subject: [PATCH] Remove case sensitivity in register names.

---
 gas/ChangeLog      |  5 +++++
 gas/config/tc-sh.c | 13 +++++++++----
 2 files changed, 14 insertions(+), 4 deletions(-)

diff --git a/gas/ChangeLog b/gas/ChangeLog
index b07bb46dc5..2df90da091 100644
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+2001-11-29 Arati Dikey <aratid@kpit.com>
+
+	* tc-sh.c (parse_at): Removed case-sensitivity of index register
+	R8, R9.
+
 2001-11-28  Jakub Jelinek  <jakub@redhat.com>
 
 	* write.c (adjust_reloc_syms): Mark SEC_MERGE symbols as used
diff --git a/gas/config/tc-sh.c b/gas/config/tc-sh.c
index 654fc0f51d..935a287604 100644
--- a/gas/config/tc-sh.c
+++ b/gas/config/tc-sh.c
@@ -994,15 +994,20 @@ parse_at (src, op)
 	}
       if (src[0] == '+')
 	{
+	  char l0, l1;
+
 	  src++;
-	  if ((src[0] == 'r' && src[1] == '8')
-	      || (src[0] == 'i' && (src[1] == 'x' || src[1] == 's')))
+	  l0 = TOLOWER (src[0]);
+	  l1 = TOLOWER (src[1]);
+
+	  if ((l0 == 'r' && l1 == '8')
+	      || (l0 == 'i' && (l1 == 'x' || l1 == 's')))
 	    {
 	      src += 2;
 	      op->type = A_PMOD_N;
 	    }
-	  if ((src[0] == 'r' && src[1] == '9')
-	      || (src[0] == 'i' && src[1] == 'y'))
+	  if ((l0 == 'r' && l1 == '9')
+	      || (l0 == 'i' && l1 == 'y'))
 	    {
 	      src += 2;
 	      op->type = A_PMODY_N;