diff options
author | Joel Brobecker <brobecker@gnat.com> | 2003-06-23 22:42:50 +0000 |
---|---|---|
committer | Joel Brobecker <brobecker@gnat.com> | 2003-06-23 22:42:50 +0000 |
commit | f125c9a4e90b18df4e6a582c2a16ce8b3a7dc697 (patch) | |
tree | f30c69f877507723a1d06c3c35ec74d6f244af1a | |
parent | 8f32e830b846dab28e84dbd22a9876aaca7aaa1a (diff) | |
download | gdb-f125c9a4e90b18df4e6a582c2a16ce8b3a7dc697.zip gdb-f125c9a4e90b18df4e6a582c2a16ce8b3a7dc697.tar.gz gdb-f125c9a4e90b18df4e6a582c2a16ce8b3a7dc697.tar.bz2 |
* gdb.base/langs.exp: Add some tests for the "minimal" language
support.
-rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/langs.exp | 15 |
2 files changed, 20 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index ce28f5d..5df53d4 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2003-06-23 Joel Brobecker <brobecker@gnat.com> + + * gdb.base/langs.exp: Add some tests for the "minimal" language + support. + 2003-06-23 Elena Zannoni <ezannoni@redhat.com> * gdb.objc/basicclass.exp: Return -1 if we cannot compile diff --git a/gdb/testsuite/gdb.base/langs.exp b/gdb/testsuite/gdb.base/langs.exp index 9ed1e91..8006bbf 100644 --- a/gdb/testsuite/gdb.base/langs.exp +++ b/gdb/testsuite/gdb.base/langs.exp @@ -145,5 +145,20 @@ if [runto csub] then { } } +gdb_exit +gdb_start +gdb_reinitialize_dir $srcdir/$subdir +gdb_load $binfile + +# Try exercising the "minimal" language a bit... + +if [runto csub] then { + gdb_test "set lang minimal" \ + "Warning: the current language does not match this frame." \ + "set lang to minimal" + + gdb_test "print x" " = 5000" "print parameter value" +} + set timeout $oldtimeout return 0 |