diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index fe1a7463266..cb9b83535d0 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-13  Alexandre Oliva  <aoliva@redhat.com>
+
+	* config/sh/sh.c (mova_p): Fix test for mova_const.
+
 2001-01-13  Neil Booth  <neil@daikokuya.demon.co.uk>
 
         * fix-header.c (read_scan_file): Use cpp_get_callbacks and
diff --git a/gcc/config/sh/sh.c b/gcc/config/sh/sh.c
index b73ab59bb3c..1526d78f930 100644
--- a/gcc/config/sh/sh.c
+++ b/gcc/config/sh/sh.c
@@ -2105,7 +2105,7 @@ mova_p (insn)
 	  && GET_CODE (SET_SRC (PATTERN (insn))) == UNSPEC
 	  && XINT (SET_SRC (PATTERN (insn)), 1) == UNSPEC_MOVA
 	  /* Don't match mova_const.  */
-	  && XVECEXP (SET_SRC (PATTERN (insn)), 0, 0) == LABEL_REF);
+	  && GET_CODE (XVECEXP (SET_SRC (PATTERN (insn)), 0, 0)) == LABEL_REF);
 }
 
 /* Find the last barrier from insn FROM which is close enough to hold the