gcc/testsuite/gfortran.dg/pr64124.f90 - gcc - Git at Google

 ! { dg-do compile }
 ! PR fortran/64124.f90
   character(len=kind(1)) x
   integer(len(x)) y
   end
	! { dg-do compile }
	! PR fortran/64124.f90
	character(len=kind(1)) x
	integer(len(x)) y
	end