diff options
| author | Pedro Alves <palves@redhat.com> | 2017-11-21 16:04:42 +0000 |
|---|---|---|
| committer | Pedro Alves <palves@redhat.com> | 2017-11-21 16:04:42 +0000 |
| commit | a25d69c6dcbabf3f6629b847246ffb4ddbc29472 (patch) | |
| tree | 25015dbc008f464f3292f528026879a305a18f53 /gdb | |
| parent | 2824e1bd4fc93f112875969b1ba606980aaa55ba (diff) | |
| download | gdb-a25d69c6dcbabf3f6629b847246ffb4ddbc29472.zip gdb-a25d69c6dcbabf3f6629b847246ffb4ddbc29472.tar.gz gdb-a25d69c6dcbabf3f6629b847246ffb4ddbc29472.tar.bz2 | |
gdb.ada/minsyms.exp: Don't hardcode the variable's address
This new testcase has a test that fails like this here:
$1 = (<data variable, no debug info> *) 0x60208c <some_minsym>
(gdb) FAIL: gdb.ada/minsyms.exp: print &some_minsym
The problem is that the testcase hardcodes an expected address for the
"some_minsym" variable, which obviously isn't stable.
Fix that by expecting $hex instead.
gdb/testsuite/ChangeLog:
2017-11-21 Pedro Alves <palves@redhat.com>
* gdb.ada/minsyms.exp: Accept any address for 'some_minsym'.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/minsyms.exp | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index fa329b4..16d2801 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2017-11-21 Pedro Alves <palves@redhat.com> + + * gdb.ada/minsyms.exp: Accept any address for 'some_minsym'. + 2017-11-20 Pedro Alves <palves@redhat.com> * gdb.base/whatis-ptype-typedefs.c (double_typedef) diff --git a/gdb/testsuite/gdb.ada/minsyms.exp b/gdb/testsuite/gdb.ada/minsyms.exp index 2c91125..9878f9f 100644 --- a/gdb/testsuite/gdb.ada/minsyms.exp +++ b/gdb/testsuite/gdb.ada/minsyms.exp @@ -35,7 +35,7 @@ gdb_test "print integer(some_minsym)" \ " = 1234" gdb_test "print &some_minsym" \ - " = \\(access <data variable, no debug info>\\) 0x62c2f8 <some_minsym>" + " = \\(access <data variable, no debug info>\\) $hex <some_minsym>" gdb_test "print /x integer(&some_minsym)" \ " = $hex" |