2 ! { dg-options "-fsecond-underscore" }
5 module m2345678901234567890123456789012345678901234567890123456789_123
9 equivalence (a(1),u(1,1)), (b(1),v(1,1))
11 ! { dg-final { scan-assembler {m2345678901234567890123456789012345678901234567890123456789_123.eq.0__} } }
12 ! { dg-final { scan-assembler {m2345678901234567890123456789012345678901234567890123456789_123.eq.1__} } }