20 lines · plain
1! RUN: %python %S/test_symbols.py %s %flang_fc12!DEF: /m Module3module m4 !DEF: /m/t PUBLIC DerivedType5 type :: t6 contains7 !DEF: /m/forwardreferenced ELEMENTAL, IMPURE, MODULE, PUBLIC (Subroutine) Subprogram8 final :: forwardreferenced9 end type10 interface11 !REF: /m/forwardreferenced12 !DEF: /m/forwardreferenced/this INTENT(INOUT) ObjectEntity TYPE(t)13 impure elemental module subroutine forwardreferenced (this)14 !REF: /m/t15 !REF: /m/forwardreferenced/this16 type(t), intent(inout) :: this17 end subroutine18 end interface19end module20