gcc/testsuite/gfortran.dg/kind_tests_3.f03

! { dg-do compile }
module my_kinds
  use, intrinsic :: iso_c_binding
  integer, parameter :: myFKind = c_float
end module my_kinds

module my_module
  use my_kinds
  real(myFKind), bind(c) :: myF  
end module my_module