c: Fix up pointer types to may_alias structures [PR114493]
[official-gcc.git] / gcc / testsuite / gfortran.dg / substring_equivalence.f90
blob1a01024bc110c1fc4b24de46cc6d8a8dd5ec398c
1 ! { dg-do compile }
2 ! Tests fix for PR24223 - ICE on equivalence statement.
4 module FLAGS
5 character(len=5) :: Encodings
6 character :: at, dev
7 equivalence ( encodings(1:1),at ), ( encodings(2:2),dev)
8 end module FLAGS