re PR middle-end/46500 (target.h includes tm.h)

	PR middle-end/46500
gcc/fortran:
	* trans-types.c: Include "tm.h".
	[0] (c_size_t_size): Remove.

From-SVN: r173771

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index b4e2e2985ec729fe5f6651ce7554160340c64215..bd9cdcbb8c67557b2ec5374d8bc8c4273fdbfb95 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2011-05-15  Joern Rennecke  <amylaar@spamcop.net>
+
+       PR middle-end/46500
+       * trans-types.c: Include "tm.h".
+       [0] (c_size_t_size): Remove.
+
 2011-05-15  Janne Blomqvist  <jb@gcc.gnu.org>
 
        PR libfortran/48915

diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c
index 22a2c5b760fa0d9b56afd086b825c8bddda18c13..9874d1625e89076f448f91105db4070f511bc0d2 100644 (file)
--- a/gcc/fortran/trans-types.c
+++ b/gcc/fortran/trans-types.c
@@ -26,6 +26,15 @@ along with GCC; see the file COPYING3.  If not see
 #include "config.h"
 #include "system.h"
 #include "coretypes.h"
+#include "tm.h"                /* For INTMAX_TYPE, INT8_TYPE, INT16_TYPE, INT32_TYPE,
+                          INT64_TYPE, INT_LEAST8_TYPE, INT_LEAST16_TYPE,
+                          INT_LEAST32_TYPE, INT_LEAST64_TYPE, INT_FAST8_TYPE,
+                          INT_FAST16_TYPE, INT_FAST32_TYPE, INT_FAST64_TYPE,
+                          BOOL_TYPE_SIZE, BITS_PER_UNIT, POINTER_SIZE,
+                          INT_TYPE_SIZE, CHAR_TYPE_SIZE, SHORT_TYPE_SIZE,
+                          LONG_TYPE_SIZE, LONG_LONG_TYPE_SIZE,
+                          FLOAT_TYPE_SIZE, DOUBLE_TYPE_SIZE,
+                          LONG_DOUBLE_TYPE_SIZE and LIBGCC2_HAS_TF_MODE.  */
 #include "tree.h"
 #include "langhooks.h" /* For iso-c-bindings.def.  */
 #include "target.h"
@@ -785,26 +794,6 @@ gfc_build_logical_type (gfc_logical_info *info)
 }
 
 
-#if 0
-/* Return the bit size of the C "size_t".  */
-
-static unsigned int
-c_size_t_size (void)
-{
-#ifdef SIZE_TYPE  
-  if (strcmp (SIZE_TYPE, "unsigned int") == 0)
-    return INT_TYPE_SIZE;
-  if (strcmp (SIZE_TYPE, "long unsigned int") == 0)
-    return LONG_TYPE_SIZE;
-  if (strcmp (SIZE_TYPE, "short unsigned int") == 0)
-    return SHORT_TYPE_SIZE;
-  gcc_unreachable ();
-#else
-  return LONG_TYPE_SIZE;
-#endif
-}
-#endif
-
 /* Create the backend type nodes. We map them to their
    equivalent C type, at least for now.  We also give
    names to the types here, and we push them in the