1! RUN: %python %S/test_symbols.py %s %flang_fc1 2!DEF: /main MainProgram 3program main 4 !DEF: /main/x POINTER ObjectEntity REAL(4) 5 pointer :: x 6 !REF: /main/x 7 real x 8 !DEF: /main/y EXTERNAL, POINTER (Function) ProcEntity REAL(4) 9 pointer :: y 10 !REF: /main/y 11 procedure (real) :: y 12 !DEF: /main/z (Implicit) ObjectEntity REAL(4) 13 !REF: /main/y 14 z = y() 15end program 16