1! { dg-do compile } 2! { dg-options "-fno-realloc-lhs" } 3! 4! PR fortran/43366 5! 6! Invalid assignment to an allocatable polymorphic var. 7! 8type t 9end type t 10class(t), allocatable :: var 11 12var = t() ! { dg-error "Assignment to an allocatable polymorphic variable at .1. requires '-frealloc-lhs'" } 13end 14