gcc/testsuite/gfortran.dg/class_44.f03

   1 ! { dg-do compile }
   2 !
   3 ! PR 49112: [4.6/4.7 Regression] [OOP] Missing type-bound procedure, "duplicate save" warnings and internal compiler error
   4 !
   5 ! Contributed by John <jwmwalrus@gmail.com>
   6
   7     implicit none
   8     save
   9
  10     type :: DateTime
  11     end type
  12
  13     class(DateTime), allocatable :: dt
  14
  15 end