gdb/testsuite/gdb.ada/mi_task_info.exp - Issue 11969036: Merge GDB 7.5.1

Side by Side Diff: gdb/testsuite/gdb.ada/mi_task_info.exp

Issue 11969036: Merge GDB 7.5.1 (Closed) Base URL: http://git.chromium.org/native_client/nacl-gdb.git@master

Patch Set: Created 7 years, 11 months ago

Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.

Jump to:

« no previous file with comments | « gdb/testsuite/gdb.ada/mi_task_arg/task_switch.adb ('k') | gdb/testsuite/gdb.ada/mod_from_name.exp » ('j') | no next file with comments »

OLD	NEW
1 # Copyright 2011-2012 Free Software Foundation, Inc.	1 # Copyright 2011-2012 Free Software Foundation, Inc.

2 #	2 #

3 # This program is free software; you can redistribute it and/or modify	3 # This program is free software; you can redistribute it and/or modify

4 # it under the terms of the GNU General Public License as published by	4 # it under the terms of the GNU General Public License as published by

5 # the Free Software Foundation; either version 3 of the License, or	5 # the Free Software Foundation; either version 3 of the License, or

6 # (at your option) any later version.	6 # (at your option) any later version.

7 #	7 #

8 # This program is distributed in the hope that it will be useful,	8 # This program is distributed in the hope that it will be useful,

9 # but WITHOUT ANY WARRANTY; without even the implied warranty of	9 # but WITHOUT ANY WARRANTY; without even the implied warranty of

10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

(...skipping 39 matching lines...) Expand 10 before \| Expand all \| Expand 10 after Loading...
50 "hdr=\\\[{width=\"1\",alignment=\"-1\",col_name=\"current\",colhdr=\"\"},{widt h=\"3\",alignment=\"1\",col_name=\"id\",colhdr=\"ID\"},{width=\"9\",alignment=\" 1\",col_name=\"task-id\",colhdr=\"TID\"},{width=\"4\",alignment=\"1\",col_name=\ "thread-id\",colhdr=\"\"},{width=\"4\",alignment=\"1\",col_name=\"parent-id\",co lhdr=\"P-ID\"},{width=\"3\",alignment=\"1\",col_name=\"priority\",colhdr=\"Pri\" },{width=\"22\",alignment=\"-1\",col_name=\"state\",colhdr=\"State\"},{width=\"1 \",alignment=\"2\",col_name=\"name\",colhdr=\"Name\"}\\\]"	50 "hdr=\\\[{width=\"1\",alignment=\"-1\",col_name=\"current\",colhdr=\"\"},{widt h=\"3\",alignment=\"1\",col_name=\"id\",colhdr=\"ID\"},{width=\"9\",alignment=\" 1\",col_name=\"task-id\",colhdr=\"TID\"},{width=\"4\",alignment=\"1\",col_name=\ "thread-id\",colhdr=\"\"},{width=\"4\",alignment=\"1\",col_name=\"parent-id\",co lhdr=\"P-ID\"},{width=\"3\",alignment=\"1\",col_name=\"priority\",colhdr=\"Pri\" },{width=\"22\",alignment=\"-1\",col_name=\"state\",colhdr=\"State\"},{width=\"1 \",alignment=\"2\",col_name=\"name\",colhdr=\"Name\"}\\\]"

51 set task_1 \	51 set task_1 \

52 "{id=\"1\",task-id=\" *(0x)?\[0-9a-fA-F\]+\",thread-id=\"\[0-9\]+\",priority=\ "\[0-9\]+\",state=\"(Child (Activation\|Termination) Wait\|Runnable)\",name=\"main _task\"}"	52 "{id=\"1\",task-id=\" *(0x)?\[0-9a-fA-F\]+\",thread-id=\"\[0-9\]+\",priority=\ "\[0-9\]+\",state=\"(Child (Activation\|Termination) Wait\|Runnable)\",name=\"main _task\"}"

53 set task_2 \	53 set task_2 \

54 "{id=\"2\",task-id=\" *(0x)?\[0-9a-fA-F\]+\",thread-id=\"\[0-9\]+\",parent-id= \"1\",priority=\"\[0-9\]+\",state=\"(Accept or Select Term\|Runnable)\",name=\"my _callee\"}"	54 "{id=\"2\",task-id=\" *(0x)?\[0-9a-fA-F\]+\",thread-id=\"\[0-9\]+\",parent-id= \"1\",priority=\"\[0-9\]+\",state=\"(Accept or Select Term\|Runnable)\",name=\"my _callee\"}"

55 set task_3 \	55 set task_3 \

56 "{current=\"\\\",id=\"3\",task-id=\" (0x)?\[0-9a-fA-F\]+\",thread-id=\"\[0-9 \]+\",parent-id=\"1\",priority=\"\[0-9\]+\",state=\"Runnable\",name=\"my_caller\ "}"	56 "{current=\"\\\",id=\"3\",task-id=\" (0x)?\[0-9a-fA-F\]+\",thread-id=\"\[0-9 \]+\",parent-id=\"1\",priority=\"\[0-9\]+\",state=\"Runnable\",name=\"my_caller\ "}"

57	57

58 # Get the full list of tasks...	58 # Get the full list of tasks...

59 mi_gdb_test "-ada-task-info" \	59 mi_gdb_test "-ada-task-info" \

60 "\\^done,tasks={nr_rows=\"3\",nr_cols=\"8\",$ada_task_info_hdr,body=\\\[$task_ 1,$task_2,$task_3\\\]}" \	60 ".*\\^done,tasks={nr_rows=\"3\",nr_cols=\"8\",$ada_task_info_hdr,body=\\\[$tas k_1,$task_2,$task_3\\\]}" \

61 "-ada-task-info with no argument"	61 "-ada-task-info with no argument"

62	62

63 # Now, only get the info about task 3.	63 # Now, only get the info about task 3.

64 mi_gdb_test "-ada-task-info 3" \	64 mi_gdb_test "-ada-task-info 3" \

65 "\\^done,tasks={nr_rows=\"1\",nr_cols=\"8\",$ada_task_info_hdr,body=\\\[$task_ 3\\\]}" \	65 "\\^done,tasks={nr_rows=\"1\",nr_cols=\"8\",$ada_task_info_hdr,body=\\\[$task_ 3\\\]}" \

66 "-ada-task-info 3"	66 "-ada-task-info 3"

67	67

OLD	NEW