3 ! PR 79311: [OOP] ICE in generate_finalization_wrapper, at fortran/class.c:1992
5 ! Contributed by DIL <liakhdi@ornl.gov>
7 module tensor_recursive
10 type :: tens_signature_t
12 final
:: tens_signature_dtor
16 type(tens_signature_t
) :: signature
18 final
:: tens_header_dtor
23 subroutine tens_signature_dtor(this
)
24 type(tens_signature_t
) :: this
27 subroutine tens_header_dtor(this
)
28 type(tens_header_t
) :: this