1! { dg-do compile }
2module my_kinds
3  use, intrinsic :: iso_c_binding
4  integer, parameter :: myFKind = c_float
5end module my_kinds
6
7module my_module
8  use my_kinds
9  real(myFKind), bind(c) :: myF  
10end module my_module
11