1! { dg-do link }
2! { dg-compile-aux-modules "class_45a.f03" }
3!
4! PR 50227: [4.7 Regression] [OOP] ICE-on-valid with allocatable class variable
5!
6! Contributed by Andrew Benson <abenson@caltech.edu>
7
8program Test
9  use G_Nodes
10  class(t0), allocatable :: c
11  allocate(t1 :: c)
12end program Test
13! { dg-final { cleanup-modules "G_Nodes" } }
14