aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/intrinsic.c
diff options
context:
space:
mode:
authorPaul Brook <pbrook@gcc.gnu.org>2004-08-11 16:05:14 +0000
committerPaul Brook <pbrook@gcc.gnu.org>2004-08-11 16:05:14 +0000
commit3ec0f302092e35b9c52cc2156c548ed04fc84b21 (patch)
tree8e552029d7eb47ffd2ba0b3e496a31cddc0b4524 /gcc/fortran/intrinsic.c
parentbe23502b448be99ca1d8bcb1700bf8191ba1fa39 (diff)
downloadgcc-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.c2
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,