Hi Tobias,
Your patch passed my tests and in top of that fixes the ICE for pr51522.f90.
However I don't understand the errors:
[macbook] f90/bug% gfc -w pr51522.f90
pr51522.f90:268.10:
integer(c_int) function vect_Utils_vuTriIneqHolds_c(u, v, tol, exception) &
1
Error: Parameter 'c_int' at (1) has not been declared or is a variable, which
does not reduce to a constant expression
pr51522.f90:270.7:
real(c_double) function vect_Utils_vuNorm_c(u, tol, badLevel, exception) bind
1
Error: Parameter 'c_double' at (1) has not been declared or is a variable,
which does not reduce to a constant expression
Is it related to the FIXME?
Thanks for the patch,
Dominique
