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
This commit is contained in:
parent
98265f29a6
commit
5218394a4c
2 changed files with 11 additions and 0 deletions
|
@ -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
|
||||
|
|
|
@ -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
|
||||
{
|
||||
|
|
Loading…
Add table
Reference in a new issue