diff options
author | Paul Brook <pbrook@gcc.gnu.org> | 2004-08-11 16:05:14 +0000 |
---|---|---|
committer | Paul Brook <pbrook@gcc.gnu.org> | 2004-08-11 16:05:14 +0000 |
commit | 3ec0f302092e35b9c52cc2156c548ed04fc84b21 (patch) | |
tree | 8e552029d7eb47ffd2ba0b3e496a31cddc0b4524 /gcc/fortran/intrinsic.c | |
parent | be23502b448be99ca1d8bcb1700bf8191ba1fa39 (diff) | |
download | gcc-3ec0f302092e35b9c52cc2156c548ed04fc84b21.zip gcc-3ec0f302092e35b9c52cc2156c548ed04fc84b21.tar.gz gcc-3ec0f302092e35b9c52cc2156c548ed04fc84b21.tar.bz2 |
[multiple changes]
2004-08-11 Paul Brook <paul@codeourcery.com>
PR fortran/16917
* intrinsic.c (add_functions): Add dfloat as an alias for dble.
2004-08-11 Steven G. Kargl <kargls@comcast.net>
* gfortran.dg/dfloat_1.f90: New test.
From-SVN: r85805
Diffstat (limited to 'gcc/fortran/intrinsic.c')
-rw-r--r-- | gcc/fortran/intrinsic.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/intrinsic.c b/gcc/fortran/intrinsic.c index c80909f..14014a0 100644 --- a/gcc/fortran/intrinsic.c +++ b/gcc/fortran/intrinsic.c @@ -1048,6 +1048,8 @@ add_functions (void) gfc_check_dble, gfc_simplify_dble, gfc_resolve_dble, a, BT_REAL, dr, 0); + make_alias ("dfloat"); + make_generic ("dble", GFC_ISYM_DBLE); add_sym_1 ("digits", 0, 1, BT_INTEGER, di, |