xref: /llvm-project/flang/test/Semantics/named-construct-declaration-conflict.f90 (revision d17ad77c959933286d9f30a38d050d239a6f4378) 
1!RUN: %python %S/test_errors.py %s %flang_fc1
2
3subroutine foo()
4  integer :: xyz
5!ERROR: 'xyz' is already declared in this scoping unit
6  xyz: do i = 1, 100
7  enddo xyz
8end subroutine
9
10
11