diff options
| author | Joel Brobecker <brobecker@gnat.com> | 2013-07-10 00:10:37 +0000 |
|---|---|---|
| committer | Joel Brobecker <brobecker@gnat.com> | 2013-07-10 00:10:37 +0000 |
| commit | 7d7c64775689625d0997b880fc2783d17c6143e8 (patch) | |
| tree | 12dbc82346c3ea603cff45372a1b55e4b4040dad /gdb/testsuite | |
| parent | 52cd8b7d705eee7248aee9f582363997362aea4b (diff) | |
| download | gdb-7d7c64775689625d0997b880fc2783d17c6143e8.zip gdb-7d7c64775689625d0997b880fc2783d17c6143e8.tar.gz gdb-7d7c64775689625d0997b880fc2783d17c6143e8.tar.bz2 | |
Fix FAIL: gdb.ada/small_reg_param.exp: continue to call_me
If enough information is provided by the compiler, the debugger
now prints the entry value of various parameters:
(gdb) continue
Continuing.
Breakpoint 2, pck.call_me (w=w@entry=50) at [...]
20 Last_Word := W;
This patch adjusts the expected output to allow an optional
"w@entry=" in the parameter value.
gdb/testsuite/ChangeLog:
* gdb.ada/small_reg_param.exp: Accept optional entry value
for parameter "w".
Diffstat (limited to 'gdb/testsuite')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/small_reg_param.exp | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 4688b38..a55b7e3 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,10 @@ 2013-07-09 Joel Brobecker <brobecker@adacore.com> + * gdb.ada/small_reg_param.exp: Accept optional entry value + for parameter "w". + +2013-07-09 Joel Brobecker <brobecker@adacore.com> + * gdb.ada/small_reg_param.exp: Remove trailing space. 2013-07-09 Doug Evans <dje@google.com> diff --git a/gdb/testsuite/gdb.ada/small_reg_param.exp b/gdb/testsuite/gdb.ada/small_reg_param.exp index 4a18a9a..b3cf2d8 100644 --- a/gdb/testsuite/gdb.ada/small_reg_param.exp +++ b/gdb/testsuite/gdb.ada/small_reg_param.exp @@ -33,7 +33,7 @@ gdb_breakpoint "call_me" # Continue until we hit the breakpoint inside `Call_Me'. We verify # that the parameter value is correct. gdb_test "continue" \ - "Breakpoint .*, pck\\.call_me \\(w=50\\) at .*/pck.adb:.*" \ + "Breakpoint .*, pck\\.call_me \\(w=(w@entry=)?50\\) at .*/pck.adb:.*" \ "continue to call_me" # And just to make sure, we also verify that the parameter value |