Commit 27e84b81 by Paul Brook Committed by Paul Brook

* gfortran.dg/g77/select_no_compile.f: Remove.

From-SVN: r92639
parent accde4cf
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,
......
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
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment