[ObjectYAML][NFC] Simplify ELFState<ELFT>::initProgramHeaders() (#123703)
[llvm-project.git] / flang / test / Semantics / symbol31.f90
blobc8016cf9ec71b9b5bb12de4ef359d4718f425da9
1 ! RUN: %python %S/test_symbols.py %s %flang_fc1
2 !DEF: /MainProgram1/pptr EXTERNAL, POINTER ProcEntity
3 procedure(), pointer :: pptr
4 !REF: /MainProgram1/pptr
5 !DEF: /mustbeexternal EXTERNAL ProcEntity
6 pptr => mustbeexternal
7 end program