------- Additional Comments From toon at moene dot indiv dot nluug dot nl
2004-11-20 12:03 -------
(In reply to comment #0)
> z2 = conjg (z1)
> 1
> Error: Type of argument 'z' in call to 'conjg' at (1) should be COMPLEX(4),
> not
> COMPLEX(8)
Yep, I think this in intrinsic.c:
add_sym_1 ("dconjg", 1, 1, BT_COMPLEX, dd, GFC_STD_GNU,
NULL, gfc_simplify_conjg, gfc_resolve_conjg,
z, BT_COMPLEX, dd, 0);
should be:
add_sym_1 ("dconjg", 1, 1, BT_COMPLEX, dd, GFC_STD_F95,
NULL, gfc_simplify_conjg, gfc_resolve_conjg,
z, BT_COMPLEX, dd, 0);
Toon.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18565
