------- Comment #2 from eedelman at gcc dot gnu dot org 2005-11-29 12:00 ------- Reduced testcase:
SUBROUTINE s(n) CHARACTER(LEN=n), EXTERNAL :: a write(6,*) a(n) END SUBROUTINE s The problem, unless I'm missing something, is that the external function a would need an explicit interface. From the draft F2003 standard, 12.3.1.1: "A procedure [...] shall have an explicit interface if it is referenced and -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25087