1 2 3 4 5 6 7
! { dg-do compile } ! ! PR fortran/41755 ! common /uno/ aa equivalence (aa,aaaaa) (bb,cc) ! { dg-error "Expecting a comma in EQUIVALENCE" } end