commit 503fc476079060728f160f1a1af8b048fdef0c7e
author Tom Tromey <tromey@adacore.com> Fri Sep 12 10:59:20 2025 -0600
committer Tom Tromey <tromey@adacore.com> Fri Sep 12 11:00:34 2025 -0600
tree 55a16a86087fd94489e99b84954c78d25a3ad965
parent 765ce064774d4070ea4452227516cecfb4377b97

Fix 32-bit failure in array_long_idx.exp

Testing on the AdaCore-internal equivalent to array_long_idx.exp
showed that it failed on 32-bit targets.  This patch fixes the problem
by arranging to use types that aren't target-dependent.

gdb/testsuite/gdb.ada/array_long_idx/main.adb

diff --git a/gdb/testsuite/gdb.ada/array_long_idx/main.adb b/gdb/testsuite/gdb.ada/array_long_idx/main.adb
index c2c480d1..6c4971f 100644
--- a/gdb/testsuite/gdb.ada/array_long_idx/main.adb
+++ b/gdb/testsuite/gdb.ada/array_long_idx/main.adb
@@ -17,7 +17,10 @@
 
 procedure Main is
 
-   type My_Array is array (Integer range <>, Long_Integer range <>) of Integer;
+   type Shorter_Integer is range -2147483648 .. 2147483647;
+   type Longer_Integer is range -9223372036854775808 .. 9223372036854775807;
+   type My_Array is array (Shorter_Integer range <>,
+                           Longer_Integer range <>) of Integer;
 
    type My_Reg_Acc is access all My_Array;