diff options
-rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.ada/mi_task_arg.exp | 6 |
2 files changed, 9 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 3b7deaf..2cf25a4 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2020-12-08 Tom de Vries <tdevries@suse.de> + + * gdb.ada/mi_task_arg.exp: Accept <optimized out> as valid value of + self_id. + 2020-12-07 Pedro Alves <pedro@palves.net> * gdb.base/break-on-linker-gcd-function.exp: Remove unused diff --git a/gdb/testsuite/gdb.ada/mi_task_arg.exp b/gdb/testsuite/gdb.ada/mi_task_arg.exp index 2a4038d..ace808c 100644 --- a/gdb/testsuite/gdb.ada/mi_task_arg.exp +++ b/gdb/testsuite/gdb.ada/mi_task_arg.exp @@ -49,9 +49,11 @@ if ![mi_runto "task_switch.break_me"] then { # Frame for task_switch.break_me set frame0 "frame=\{level=\"0\",args=\\\[\\\]\}" # Frame for task_switch.caller -set frame1 "frame=\{level=\"1\",args=\\\[\{name=\"<_task>\",value=\"$hex\"\}\\\]\}" +set frame1_args "\{name=\"<_task>\",value=\"$hex\"\}" +set frame1 "frame=\{level=\"1\",args=\\\[$frame1_args\\\]\}" # Frame for system.tasking.stages.task_wrapper -set frame2 "frame=\{level=\"2\",args=\\\[(\{name=\"self_id\",value=\"$hex\"\})?\\\]\}" +set frame2_args "(\{name=\"self_id\",value=\"($hex|<optimized out>)\"\})?" +set frame2 "frame=\{level=\"2\",args=\\\[$frame2_args\\\]\}" mi_gdb_test "-stack-list-arguments 1" \ "\\^done,stack-args=\\\[$frame0,$frame1,$frame2,.*" \ "-stack-list-arguments 1" |