https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100970
anlauf at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- Keywords| |accepts-invalid Status|UNCONFIRMED |NEW Ever confirmed|0 |1 Last reconfirmed| |2021-06-13 --- Comment #1 from anlauf at gcc dot gnu.org --- Could be related to some other PRs involving initialization of derived types. A missing check accepts invalid code, such as: program m implicit none type t integer :: a(1) = [1, 2] end type type(t), parameter :: x(4) = t() print *, x end which prints: 1 2 1 2 All versions tested down to at least 7 fail.