c++: constrained lambda error-recovery [PR108972]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr85542.f90
blobf61d2c9beb0b3284a3afe8b8a63a1a8c5249551b
1 ! { dg-do compile }
2 ! PR fortran/85542
3 function f(x)
4 character(*), intent(in) :: x
5 character((len((x)))) :: f
6 f = x
7 end