summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark Kettenis <kettenis@gnu.org>2005-07-10 20:49:38 +0000
committerMark Kettenis <kettenis@gnu.org>2005-07-10 20:49:38 +0000
commite7aa06ef483d773724572718ee89e64f2e28cf5f (patch)
tree386951b44dae77bebc685316686c600f02d9cd5d
parenta385fa0b5d139834d1e8498a7b331b03f7ad954b (diff)
downloadgdb-e7aa06ef483d773724572718ee89e64f2e28cf5f.tar.gz
* gdb.mi/mi2-stack.exp (test_stack_locals_listing): Remove test for
-stack-select-frame without arguments. (test_stack_frame_listing): Add test for newly implemented command -stack-info-frame.
-rw-r--r--gdb/testsuite/ChangeLog7
-rw-r--r--gdb/testsuite/gdb.mi/mi2-stack.exp12
2 files changed, 12 insertions, 7 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 3b60675cc8e..f2a190ed9dc 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2005-07-10 Mark Kettenis <kettenis@gnu.org>
+
+ * gdb.mi/mi2-stack.exp (test_stack_locals_listing): Remove test for
+ -stack-select-frame without arguments.
+ (test_stack_frame_listing): Add test for newly implemented command
+ -stack-info-frame.
+
2005-07-06 Bob Rossi <bob@brasko.net>
* gdb.mi/mi-basics.exp (test_setshow_inferior_tty): Test MI tty
diff --git a/gdb/testsuite/gdb.mi/mi2-stack.exp b/gdb/testsuite/gdb.mi/mi2-stack.exp
index 5bd150dca2c..80e82b6e996 100644
--- a/gdb/testsuite/gdb.mi/mi2-stack.exp
+++ b/gdb/testsuite/gdb.mi/mi2-stack.exp
@@ -55,6 +55,7 @@ proc test_stack_frame_listing {} {
# -stack-list-frames
# -stack-list-frames 1 1
# -stack-list-frames 1 3
+ # -stack-info-frame
mi_gdb_test "231-stack-list-frames" \
"231\\^done,stack=\\\[frame=\{level=\"0\",addr=\"$hex\",func=\"callee4\",file=\".*basics.c\",fullname=\"${fullname_syntax}${srcfile}\",line=\"$line_callee4_body\"\},frame=\{level=\"1\",addr=\"$hex\",func=\"callee3\",.*\},frame=\{level=\"2\",addr=\"$hex\",func=\"callee2\",.*\},frame=\{level=\"3\",addr=\"$hex\",func=\"callee1\",.*\},frame=\{level=\"4\",addr=\"$hex\",func=\"main\",.*\}\\\]" \
@@ -69,6 +70,10 @@ proc test_stack_frame_listing {} {
mi_gdb_test "234-stack-list-frames 1" \
"234\\^error,msg=\"mi_cmd_stack_list_frames: Usage.*FRAME_LOW FRAME_HIGH.*\"" \
"stack frame listing wrong"
+
+ mi_gdb_test "235-stack-info-frame" \
+ "235\\^done,frame=\{level=\"0\",addr=\"$hex\",func=\"callee4\",file=\".*basics.c\",fullname=\"${fullname_syntax}${srcfile}\",line=\"$line_callee4_body\"\}" \
+ "selected frame listing"
}
proc test_stack_args_listing {} {
@@ -182,16 +187,9 @@ gdb_expect {
"232\\^done,locals=\\\[\\\]" \
"stack locals listing for new frame"
-# this should be a no-op
-
- mi_gdb_test "232-stack-select-frame" \
- "232\\^done" \
- "stack select same frame"
-
mi_gdb_test "232-stack-list-locals 1" \
"232\\^done,locals=\\\[\\\]" \
"stack locals for same frame (level 1)"
-
}
mi_runto callee4