1! { dg-do compile } 2! PR fortran/25078 3! An equivalence statement requires two or more objcets. 4program a 5 real x 6 equivalence(x) ! { dg-error "two or more objects" } 7end program a 8