diff options
author | Joern Rennecke <amylaar@spamcop.net> | 2011-05-15 12:50:57 +0000 |
---|---|---|
committer | Joern Rennecke <amylaar@gcc.gnu.org> | 2011-05-15 13:50:57 +0100 |
commit | 29eabd788fd921611c5800e2d173f097bdabd117 (patch) | |
tree | 8a7aea9671cfd3db12866cdac5ed9f95de3cc0ea /gcc | |
parent | 817f24d98ed7db2fc3f7265a68eeb3e28a85502e (diff) | |
download | gcc-29eabd788fd921611c5800e2d173f097bdabd117.zip gcc-29eabd788fd921611c5800e2d173f097bdabd117.tar.gz gcc-29eabd788fd921611c5800e2d173f097bdabd117.tar.bz2 |
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
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/fortran/trans-types.c | 29 |
2 files changed, 15 insertions, 20 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index b4e2e29..bd9cdcb 100644 --- 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 22a2c5b..9874d16 100644 --- 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 |