1! { dg-do compile } 2! { dg-options "-std=gnu" } 3 4! PR fortran/36492 5! Check for incorrect error message with -std=f2003. 6! Reduced test triggering the ICE mentioned in comment #4, PR 36492. 7 8implicit none 9 10type t 11 character (a) :: arr (1) = [ "a" ] 12 ! { dg-error "specification expression" "" { target *-*-* } 11 } 13end type t 14 15end 16