2 ! PR fortran/108527 - ICE in compare_bound_int
3 ! Contributed by G.Steinmetz
6 integer, parameter :: a((2.)) = [4,8] ! { dg-error "must be of INTEGER type" }
7 integer(a(1:1)) :: b
! { dg-error "Unclassifiable statement" }
10 ! { dg-prune-output "Parameter array" }