|
Lines 1800-1805
gfc_type_for_size (unsigned bits, int un
Link Here
|
| 1800 |
if (type && bits == TYPE_PRECISION (type)) |
1800 |
if (type && bits == TYPE_PRECISION (type)) |
| 1801 |
return type; |
1801 |
return type; |
| 1802 |
} |
1802 |
} |
|
|
1803 |
|
| 1804 |
/* Handle TImode as a special case because it is used by some backends |
| 1805 |
(eg. ARM) even though it is not available for normal use. */ |
| 1806 |
#if HOST_BITS_PER_WIDE_INT >= 64 |
| 1807 |
if (bits == TYPE_PRECISION (intTI_type_node)) |
| 1808 |
return intTI_type_node; |
| 1809 |
#endif |
| 1803 |
} |
1810 |
} |
| 1804 |
else |
1811 |
else |
| 1805 |
{ |
1812 |
{ |
