diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 4608c672401f9a3fe23424e0d226c55b6d798693..266851f367dbf36ad799c6ca304127e4f0ea4b15 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2004-12-27  Paul Brook  <paul@codesourcery.com>
+
+	* gfortran.dg/g77/select_no_compile.f: Remove.
+
 2004-12-27  Richard Henderson  <rth@redhat.com>
 
 	* gcc.dg/vect/vect-27a.c, gcc.dg/vect/vect-29a.c,
diff --git a/gcc/testsuite/gfortran.dg/g77/select_no_compile.f b/gcc/testsuite/gfortran.dg/g77/select_no_compile.f
deleted file mode 100644
index 242562e9212c702b792e10713e99bc32ca518bb3..0000000000000000000000000000000000000000
--- a/gcc/testsuite/gfortran.dg/g77/select_no_compile.f
+++ /dev/null
@@ -1,11 +0,0 @@
-c { dg-do compile }
-       integer*1 one
-       integer*2 two
-       parameter (one=1)
-       parameter (two=2)
-       select case (I)
-       case (one) ! { dg-error "Expression in CASE statement" "" }
-       case (two) ! { dg-error "Expression in CASE statement" "" }
-       end select
-       end
-