1! { dg-do compile } 2module binding_label_tests_5 3 use, intrinsic :: iso_c_binding 4 5 interface 6 subroutine sub0() bind(c, name='c_sub') ! Odd declaration but perfectly valid 7 end subroutine sub0 8 9 subroutine sub1() bind(c, name='c_sub') ! Ditto. 10 end subroutine sub1 11 end interface 12end module binding_label_tests_5 13