aboutsummaryrefslogtreecommitdiff
path: root/gcc/algol68/a68-lang.cc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/algol68/a68-lang.cc')
-rw-r--r--gcc/algol68/a68-lang.cc5
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/algol68/a68-lang.cc b/gcc/algol68/a68-lang.cc
index 8ba0259..f5f316a 100644
--- a/gcc/algol68/a68-lang.cc
+++ b/gcc/algol68/a68-lang.cc
@@ -336,6 +336,11 @@ a68_type_for_size (unsigned int bits, int unsignedp)
}
else
{
+ /* Handle TImode as a special case because it is used by some backends
+ (e.g. ARM) even though it is not available for normal use. */
+ if (bits == TYPE_PRECISION (intTI_type_node))
+ return intTI_type_node;
+
if (bits <= TYPE_PRECISION (a68_short_short_int_type))
return a68_short_short_int_type;
if (bits <= TYPE_PRECISION (a68_short_int_type))