gcc/testsuite/gfortran.fortran-torture/compile/named_args_2.f90

   1 ! this is the reduced testcase from pr13372
   2 ! we wrongly add a symbol "P" to the module
   3 ! Currently (2004/06/09) a workaround is in place
   4 ! PR 15481 tracks any steps towards a real fix.
   5 module typeSizes
   6 implicit none
   7   integer, parameter :: FourByteReal = selected_real_kind(P =  6, R =  37)
   8 end module typeSizes