]> git.ipfire.org Git - thirdparty/binutils-gdb.git/commitdiff
Fix 32-bit failure in array_long_idx.exp
authorTom Tromey <tromey@adacore.com>
Fri, 12 Sep 2025 16:59:20 +0000 (10:59 -0600)
committerTom Tromey <tromey@adacore.com>
Fri, 12 Sep 2025 17:00:34 +0000 (11:00 -0600)
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

index c2c480d158e02951ffeb3c0d960955ad105eac04..6c4971f71d699d21a65b5981c56b12dce8e10278 100644 (file)
@@ -17,7 +17,10 @@ with Pck; use Pck;
 
 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;