brintos / llvm-project-archived public Read only

Text · 275 B · 2245abe Raw

8 lines · plain

1!RUN: %python %S/test_errors.py %s %flang_fc12procedure(), pointer :: pp => tan3!ERROR: EXTERNAL attribute was already specified on 'pp'4!ERROR: POINTER attribute was already specified on 'pp'5!ERROR: 'pp' was previously initialized6procedure(real), pointer :: pp => tan7end8