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 4688b388f00e7400dbb5e0ab1796297f7ef48dde..a55b7e368fa65d1fa79b0c699534c3ab0e46cc4f 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+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.

diff --git a/gdb/testsuite/gdb.ada/small_reg_param.exp b/gdb/testsuite/gdb.ada/small_reg_param.exp
index 4a18a9a00a4ba7ee7a7c6982c1f1e0af2565d285..b3cf2d8d241f92d308beed244486773435b67624 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