diff options
| author | Paul Brook <paul@codesourcery.com> | 2007-05-15 21:47:54 +0000 |
|---|---|---|
| committer | Paul Brook <pbrook@gcc.gnu.org> | 2007-05-15 21:47:54 +0000 |
| commit | 5218394a4c5d2fe801634de054cf7e40e01919ef (patch) | |
| tree | d2018abb7b8b0094222dd99f61e88c1952776ac3 /gcc | |
| parent | 98265f29a6f460703db6389084716d580605ac2e (diff) | |
| download | gcc-5218394a4c5d2fe801634de054cf7e40e01919ef.zip gcc-5218394a4c5d2fe801634de054cf7e40e01919ef.tar.gz gcc-5218394a4c5d2fe801634de054cf7e40e01919ef.tar.bz2 | |
trans-types.c (gfc_type_for_size): Handle signed TImode.
2007-05-15 Paul Brook <paul@codesourcery.com>
* trans-types.c (gfc_type_for_size): Handle signed TImode.
From-SVN: r124748
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/fortran/trans-types.c | 7 |
2 files changed, 11 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 625e304..83a808d 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2007-05-15 Paul Brook <paul@codesourcery.com> + + * trans-types.c (gfc_type_for_size): Handle signed TImode. + 2007-05-14 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> PR fortran/30723 diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c index d83987e..db85d96 100644 --- a/gcc/fortran/trans-types.c +++ b/gcc/fortran/trans-types.c @@ -1785,6 +1785,13 @@ gfc_type_for_size (unsigned bits, int unsignedp) if (type && bits == TYPE_PRECISION (type)) return type; } + + /* Handle TImode as a special case because it is used by some backends + (eg. ARM) even though it is not available for normal use. */ +#if HOST_BITS_PER_WIDE_INT >= 64 + if (bits == TYPE_PRECISION (intTI_type_node)) + return intTI_type_node; +#endif } else { |