1! { dg-do run } 2! 3! PR fortran/27997 4! 5! Array constructor with typespec, check for regression 6! with fixed form. 7! 8 integer :: a(2), realabc, real_abc2 9 a = [ realabc, real_abc2 ] 10 end 11