PR fortran/30964

[pf3gnuchains/gcc-fork.git] / 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