lto: Remove random_seed from section name.
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr108528.f90
blob7a353cb7eab15745767c57a933ece4fdcd84daa9
1 ! { dg-do compile }
2 ! PR fortran/108528 -
3 ! Contributed by G.Steinmetz
5 function f() ! { dg-error "mismatched array specifications" }
6 integer :: f((2.)) ! { dg-error "must be of INTEGER type" }
7 integer :: g((2))
8 entry g()
9 end