[Bug fortran/32170] string badly passed as function arguments

[dominiq at lps dot ens dot fr]

------- Comment #5 from dominiq at lps dot ens dot fr  2007-05-31 19:33 -------
Compiled with g95, the code in comment #3 gives

In file pr32170_2.f90:10

      call test( (/ "string1", "string2" /) )
In file pr32170_2.f90:16

      subroutine test(chars)
                      2
Error: Passing array at (1) to assumed-shape actual argument at (2) via an
implicit interface
In file pr32170_2.f90:9

      call test( str2 )
                 1
In file pr32170_2.f90:16

      subroutine test(chars)
                      2
Error: Passing array at (1) to assumed-shape actual argument at (2) via an
implicit interface

These errors explain why the code is invalid.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32170