Commit 29eabd78 by Joern Rennecke Committed by Joern Rennecke

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
parent 817f24d9
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
......
......@@ -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
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment