PR fortran/45436

	* trans-types.c (gfc_init_kinds): Disable TFmode.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@163611 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 24c3e7a..9d86cea 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2010-08-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
+
+       PR fortran/45436
+       * trans-types.c (gfc_init_kinds): Disable TFmode.
+
 2010-08-27  Janus Weil  <janus@gcc.gnu.org>
 
        PR fortran/45432

diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c
index 348ffea..11fecd9 100644 (file)
--- a/gcc/fortran/trans-types.c
+++ b/gcc/fortran/trans-types.c
@@ -410,12 +410,11 @@ gfc_init_kinds (void)
 
       /* Only let float, double, long double and __float128 go through.
         Runtime support for others is not provided, so they would be
-        useless.  TFmode support is only enabled with option
-        -fsoft-float.  */
+        useless.  TODO: TFmode support should be enabled once libgfortran
+        support is done.  */
        if (mode != TYPE_MODE (float_type_node)
          && (mode != TYPE_MODE (double_type_node))
-          && (mode != TYPE_MODE (long_double_type_node))
-         && (mode != TFmode))
+          && (mode != TYPE_MODE (long_double_type_node)))
        continue;
 
       /* Let the kind equal the precision divided by 8, rounding up.  Again,