[Bug fortran/20901] different intrinsic types in equivalence not detected

[pault at gcc dot gnu dot org]

------- Additional Comments From pault at gcc dot gnu dot org  2005-09-26 19:37 -------
(In reply to comment #1)
> This is resolved by
> 
> http://gcc.gnu.org/ml/fortran/2005-09/msg00438.html
> 
> Paul T

PS The testcase checks the character sequence, rather than default character type:

! { dg-do compile }
! { dg-options "-std=f95" }
! PR20901 - F95 constrains mixing of types in equivalence.
! Contributed by Joost VandeVondele <jv244@cam.ac.uk>
TYPE data_type
 SEQUENCE
 character :: j
END TYPE data_type
INTEGER :: j
TYPE (data_type) :: d
EQUIVALENCE (d, J) ! { dg-error "in CHARACTER EQUIVALENCE statement" }
END




-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20901