1! RUN: %python %S/test_symbols.py %s %flang_fc1 2! Ensure that a misparsed function reference that turns out to be an 3! array element reference still applies implicit typing, &c. 4!DEF: /subr (Subroutine) Subprogram 5subroutine subr 6 !DEF: /subr/moo (Implicit) ObjectEntity INTEGER(4) 7 common //moo(1) 8 !DEF: /subr/a ObjectEntity REAL(4) 9 !REF: /subr/moo 10 real a(moo(1)) 11end subroutine 12