From d748c0fb81ca932a81630a483441f81a5cd39a55 Mon Sep 17 00:00:00 2001 From: pbrook Date: Mon, 27 Dec 2004 15:29:14 +0000 Subject: [PATCH] * gfortran.dg/g77/select_no_compile.f: Remove. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@92639 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/testsuite/ChangeLog | 4 ++++ gcc/testsuite/gfortran.dg/g77/select_no_compile.f | 11 ----------- 2 files changed, 4 insertions(+), 11 deletions(-) delete mode 100644 gcc/testsuite/gfortran.dg/g77/select_no_compile.f diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 4608c672401..266851f367d 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2004-12-27 Paul Brook + + * gfortran.dg/g77/select_no_compile.f: Remove. + 2004-12-27 Richard Henderson * 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 242562e9212..00000000000 --- 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 - -- 2.11.4.GIT