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".

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 4688b38..a55b7e3 100644 (file)
--- 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 (file)
--- 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