3 ! Makes sure that our name mangling scheme can't be outwitted
18 ! New scheme, relies on capitalization
21 subroutine m2_MOD_m3()
22 ! mangled to __m2_MOD_m2_mod_m3
23 end subroutine m2_MOD_m3
29 ! mangled to __m2_mod_m2_MOD_m3
32 ! { dg-final { cleanup-modules "m1 m1__m2 m2 m2_MOD_m2" } }