diff options
| author | Joel Brobecker <brobecker@gnat.com> | 2008-01-08 18:17:30 +0000 |
|---|---|---|
| committer | Joel Brobecker <brobecker@gnat.com> | 2008-01-08 18:17:30 +0000 |
| commit | 88e2547f139cd37f679460bac0e3ab94feef2533 (patch) | |
| tree | 30b3f48a08e2c3ace61442d9ca21693f6bfb0e5b | |
| parent | a84a8a0d30b375691d864cf8d842fa19354e7e20 (diff) | |
| download | gdb-88e2547f139cd37f679460bac0e3ab94feef2533.zip gdb-88e2547f139cd37f679460bac0e3ab94feef2533.tar.gz gdb-88e2547f139cd37f679460bac0e3ab94feef2533.tar.bz2 | |
* gdb.ada/print_pc.exp: Add verification of where gdb_start_cmd
landed. Should also fix random failures in the test following it.
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/print_pc.exp | 4 |
2 files changed, 9 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index dd100f6..e973914 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2008-01-08 Joel Brobecker <brobecker@adacore.com> + + * gdb.ada/print_pc.exp: Add verification of where gdb_start_cmd + landed. Should also fix random failures in the test following it. + 2008-01-07 Thiago Jung Bauermann <bauerman@br.ibm.com> * gdb.base/dfp-exprs.exp (test_dfp_arithmetic_expressions): Add tests diff --git a/gdb/testsuite/gdb.ada/print_pc.exp b/gdb/testsuite/gdb.ada/print_pc.exp index 50fbe75..555ef10 100644 --- a/gdb/testsuite/gdb.ada/print_pc.exp +++ b/gdb/testsuite/gdb.ada/print_pc.exp @@ -39,6 +39,10 @@ if { [gdb_start_cmd] < 0 } { return -1 } +gdb_test "" \ + "dummy \\(\\) at .*dummy.adb:.*" \ + "start inferior" + gdb_test "p /x \$pc" \ "0x\[0-9a-zA-Z\]+" \ "p /x \$pc" |