------- Comment #1 from tobias dot burnus at physik dot fu-berlin dot de 2006-05-13 23:01 ------- The following is also not caught: ----------------------------- subroutine foo(y) character(len=20) :: y y = 'hello world' end
program test character(len=10) :: x call foo(x) write(*,*) 'X=',x pause end ----------------------------- NAG's f95 spits out this error: Error: test17.f90: Argument Y (no. 1) in reference to FOO from TEST is too short a character string -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=27586