diff --git a/gas/ChangeLog b/gas/ChangeLog
index 08d43c04a9..6747d4c193 100644
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+2002-01-30  Richard Sandiford  <rsandifo@redhat.com>
+
+	* config/tc-sh.c (parse_reg): Fix end-of-word check for is, ix, iy
+	and mod.
+
 2002-01-29  Chris Demetriou  <cgd@broadcom.com>
 
 	* config/tc-mips.c (tc_gen_reloc): Arrange for
diff --git a/gas/config/tc-sh.c b/gas/config/tc-sh.c
index 7a15bd48aa..fa9869fc59 100644
--- a/gas/config/tc-sh.c
+++ b/gas/config/tc-sh.c
@@ -598,7 +598,7 @@ parse_reg (src, mode, reg)
 	}
     }
 
-  if (l0 == 'i' && l1 && ! IDENT_CHAR ((unsigned char) src[3]))
+  if (l0 == 'i' && l1 && ! IDENT_CHAR ((unsigned char) src[2]))
     {
       if (l1 == 's')
 	{
@@ -733,7 +733,7 @@ parse_reg (src, mode, reg)
 	}
     }
   if (l0 == 'm' && l1 == 'o' && TOLOWER (src[2]) == 'd'
-      && ! IDENT_CHAR ((unsigned char) src[4]))
+      && ! IDENT_CHAR ((unsigned char) src[3]))
     {
       *mode = A_MOD;
       return 3;