http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42418
--- Comment #5 from Dominique d'Humieres <dominiq at lps dot ens.fr> 2012-01-28 23:07:49 UTC --- With gfortran 4.4.6, 4.5.3, 4.6.2, and trunk, the test in comment #0 gives the error while the test in comment #1 with the 'function fun(f,x)' block uncommented compiles and runs to give [macbook] f90/bug% a.out 1.00000000 2.00000000 with no error when run through valgrind.