20180-12-08 Steven G. Kargl <kargl@gcc.gnu.org>

[official-gcc.git] / gcc / testsuite / gfortran.dg / pr87945_2.f90

! { dg-do compile }
! PR fortran/87945
program p
   character :: a, b
   a%len = 1      ! { dg-error "to a constant expression" }
   b%kind = 'b'   ! { dg-error "to a constant expression" }
end