3 ! PR20890 - Equivalence cannot contain overlapping unequal initializers.
4 ! Contributed by Joost VandeVondele <jv244@cam.ac.uk>
5 ! Started out being in BLOCK DATA; however, blockdata variables must be in
6 ! COMMON and therefore cannot have F95 style initializers....
8 INTEGER :: I=1,J=2 ! { dg-error "Overlapping unequal initializers" }
12 ! { dg-final { cleanup-modules "data" } }