1! RUN: %flang_fc1 -fsyntax-only -pedantic %s 2>&1 | FileCheck %s --allow-empty 2! Regression test for bogus use-association name conflict 3! error: Cannot use-associate 's2'; it is already declared in this scope 4! CHECK-NOT: error: 5module m1 6 contains 7 subroutine s1 8 end 9 subroutine s2 10 end 11end 12 13module m2 14 use m1, s1a => s1 15 use m1, s2a => s2 16 contains 17 subroutine s1 18 end 19 subroutine s2 20 end 21end 22