| ! { dg-do compile } | |
| ! | |
| ! PR 53956: [F03] PROCEDURE w/ interface: Bogus "EXTERNAL attribute conflicts with FUNCTION attribute" | |
| ! | |
| ! Contributed by James van Buskirk | |
| interface | |
| subroutine sub (a) | |
| integer, external :: a | |
| end subroutine | |
| end interface | |
| procedure(sub) :: proc | |
| end |