https://gcc.gnu.org/g:a1d895cd7a1d83c22d2544336655be14ed8a981b
commit r16-5929-ga1d895cd7a1d83c22d2544336655be14ed8a981b Author: Jose E. Marchesi <[email protected]> Date: Sat Dec 6 02:47:37 2025 +0100 a68: handle intTI_type_node in a68_type_for_size gcc/algol68/ChangeLog PR algol68/123007 * a68-lang.cc (a68_type_for_size): Handle intTI_type_node. Diff: --- gcc/algol68/a68-lang.cc | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/gcc/algol68/a68-lang.cc b/gcc/algol68/a68-lang.cc index 8ba0259ce29d..f5f316a3fdb1 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))
