1! { dg-do compile }
2! PR fortran/20869
3! Note 12.11 "A name shall not appear in both an EXTERNAL and an
4! INTRINSIC statement in the same scoping unit.
5program u
6 intrinsic :: nint
7 external :: nint ! { dg-error "EXTERNAL attribute conflicts with INTRINSIC attribute" }
8end program u
9