1!RUN: bbc --dump-symbols %s | FileCheck %s 2!RUN: %flang_fc1 -fdebug-dump-symbols %s | FileCheck %s 3 4! Test that empty parent types are still set first in the 5! runtime info global array describing components. 6module empty_parent 7 type :: z 8 end type 9 10 type, extends(z) :: t 11 integer :: a 12 end type 13end module 14! CHECK: .c.t, SAVE{{.*}}.n.z{{.*}}n.a 15