gcc/testsuite/gfortran.dg/kind_tests_2.f03

   1 ! { dg-do compile }
   2 module kind_tests_2
   3   use, intrinsic :: iso_c_binding
   4
   5   integer, parameter :: myFKind = c_float
   6   real(myFKind), bind(c) :: myF
   7 end module kind_tests_2
   8
   9 ! { dg-final { cleanup-modules "kind_tests_2" } }