diff options
Diffstat (limited to 'gdb/testsuite/gdb.chill/chillvars.exp')
| -rw-r--r-- | gdb/testsuite/gdb.chill/chillvars.exp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.chill/chillvars.exp b/gdb/testsuite/gdb.chill/chillvars.exp index 78d9f01..4651826 100644 --- a/gdb/testsuite/gdb.chill/chillvars.exp +++ b/gdb/testsuite/gdb.chill/chillvars.exp @@ -61,6 +61,8 @@ proc do_tests {} { test_arrays test_strings test_structs + + test_ptr } proc test_BOOL {} { @@ -284,6 +286,11 @@ proc test_structs {} { ".* = \\\[.abool: TRUE, \.nstruct: \\\[\.abool: FALSE, \.aint: 456, \.astring: \"deadbeef\"\\\], \.aint: 789\\\]" } +proc test_ptr {} { + # This is to test Cygnus PR 6932 + gdb_test "print xptr->int" ".* = 32767" +} + # Check to see if we have an executable to test. If not, then either we # haven't tried to compile one, or the compilation failed for some reason. # In either case, just notify the user and skip the tests in this file. |