Skip to content
Snippets Groups Projects
Commit 27e84b81 authored by Paul Brook's avatar Paul Brook Committed by Paul Brook
Browse files

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

From-SVN: r92639
parent accde4cf
No related branches found
No related tags found
No related merge requests found
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
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment