host association question

[Dominique Dhumieres]

Marco,

With gcc version 4.3.0 20061118, your second test gives:

bad_func_1.f90:9.19:

function internal_f
                  1
Error: Expected formal argument list in function definition at (1)
bad_func_1.f90:10.22:

 real :: internal_f(5)
                     1
Error: Symbol 'internal_f' at (1) has already been host associated
bad_func_1.f90:13.10:

internal_f = 2
         1
Error: Symbol 'internal_f' at (1) has already been host associated
bad_func_1.f90:15.3:

end function internal_f
  1
Error: Expecting END PROGRAM statement at (1)

As I said in
http://gcc.gnu.org/ml/fortran/2006-11/msg00529.html
assuming the modified code I posted is standard conforming,
the is a bug in gfortran with the host association: the test
in the above post compiles and gives the expected result
for all the other compilers I have tried on both OSX and
Linux/AMD64.

Cheers

Dominique