This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/19575] cdabs intrinsic incorrectly handled with -std=f95
- From: "sgk at troutmask dot apl dot washington dot edu" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 22 Jan 2005 19:25:25 -0000
- Subject: [Bug fortran/19575] cdabs intrinsic incorrectly handled with -std=f95
- References: <20050122115718.19575.coudert@clipper.ens.fr>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Additional Comments From sgk at troutmask dot apl dot washington dot edu 2005-01-22 19:25 -------
Part of the problem is due to the following from intrinsic.c
add_sym_1 ("zabs", 1, 1, BT_REAL, dd, GFC_STD_GNU,
NULL, gfc_simplify_abs, gfc_resolve_abs,
a, BT_COMPLEX, dd, REQUIRED);
make_alias ("cdabs");
make_alias() does not set the GFC_STD_GNU flag. If you change
cdabs to zabs, you get
kargl[216] gfc -o y -std=f95 y.f90
In file y.f90:3
intrinsic zabs
1
Error: Intrinsic at (1) does not exist
which is the expected behavior. We still get the
NaN if -std=f95 is removed from the command line.
NAG's compiler states
kargl[224] f95 -o y -dcfuns y.f90
Error: y.f90, line 5: Intrinsic CDABS cannot be an actual argument
[f95 error termination]
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19575