diff options
Diffstat (limited to 'gdb')
| -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 |