lto: Remove random_seed from section name.
[official-gcc.git] / gcc / testsuite / gfortran.dg / realloc_on_assign_20.f90
blobd4cfaf841c6aea7a6e0dbb1d95285d4d7ec2e52a
1 ! { dg-do compile }
2 ! { dg-options "-std=f2003" }
4 ! PR fortran/43366
6 ! Invalid assignment to an allocatable polymorphic var.
8 type t
9 end type t
10 class(t), allocatable :: var
12 var = t() ! { dg-error "Fortran 2008: Assignment to an allocatable polymorphic variable" }
13 end