]> git.ipfire.org Git - thirdparty/binutils-gdb.git/commit
[gdb/testsuite] Fix gdb.ada/big_packed_array.exp on s390x-linux
authorTom de Vries <tdevries@suse.de>
Tue, 4 Feb 2025 13:06:20 +0000 (14:06 +0100)
committerTom de Vries <tdevries@suse.de>
Tue, 4 Feb 2025 13:06:20 +0000 (14:06 +0100)
commit96a02b669eb4e5483bc820cc2cc8acfff8b8ae23
tree70eec481f7176fcec1bce9bc9a766349511b700c
parentc263c0ddcf9cad86ad76da7c6f057308c5d81bb1
[gdb/testsuite] Fix gdb.ada/big_packed_array.exp on s390x-linux

When running test-case gdb.ada/big_packed_array.exp on s390x-linux, I run
into:
...
(gdb) print bad^M
$2 = (0 => 0 <repeats 24 times>, 1)^M
(gdb) FAIL: gdb.ada/big_packed_array.exp: scenario=minimal: print bad
...

This is with gcc 7.5.0, and this xfail should trigger:
...
           if { $have_xfail && [string is integer $last] \
                   && [expr ($last & 0xf) == 0] } {
                # gcc/101643
                setup_xfail *-*-*
            }
...
but it doesn't because $last is '1'.

Fix this by using 0xf0 as mask for big endian.

Tested on s390x-linux.
gdb/testsuite/gdb.ada/big_packed_array.exp