------- Comment #1 from kargl at gcc dot gnu dot org 2009-08-25 00:36 -------
There isn't a problem with having more than 2 complex function
in a file. The problem is that your complex functions are
using a nonstandard extension.
REMOVE:kargl[242] cat > k.f90
COMPLEX FUNCTION F0_HDEC*16(M1,M2,QSQ)
RETURN
END
REMOVE:kargl[243] gfc4x -c k.f90
k.f90:1.30:
COMPLEX FUNCTION F0_HDEC*16(M1,M2,QSQ)
1
Error: Expected formal argument list in function definition at (1)
Notice is error is point at the *. I'm fairly certain that there
was a previous bug report about this form, and it was decided that
it would not be supported. I'll see if I can find the old bug
report. Perhpas, tobias remembers the details.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41160
