8 lines · plain
1! RUN: %python %S/test_symbols.py %s %flang_fc12 !DEF: /MainProgram1/pptr EXTERNAL, POINTER ProcEntity3 procedure(), pointer :: pptr4 !REF: /MainProgram1/pptr5 !DEF: /mustbeexternal EXTERNAL ProcEntity6 pptr => mustbeexternal7end program8