diff options
| author | Elena Zannoni <ezannoni@kwikemart.cygnus.com> | 2000-03-14 17:01:05 +0000 |
|---|---|---|
| committer | Elena Zannoni <ezannoni@kwikemart.cygnus.com> | 2000-03-14 17:01:05 +0000 |
| commit | 751a959bb828352de7d12339268c363a0773af5f (patch) | |
| tree | 89bf929b3fcceefb301376aae1b63096746e733e /gdb/testsuite | |
| parent | ee4dd2c9756db42e1cdc8dd526875420143a3963 (diff) | |
| download | gdb-751a959bb828352de7d12339268c363a0773af5f.zip gdb-751a959bb828352de7d12339268c363a0773af5f.tar.gz gdb-751a959bb828352de7d12339268c363a0773af5f.tar.bz2 | |
2000-03-14 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* eval.c (evaluate_subexp_with_coercion): Add call to
check_typedef, to handle typedeffed vars correctly.
* gdb.base/printcmds.c: Add typedeffed arrays.
* gdb.base/printcmds.exp (test_print_typedef_arrays): New
procedure to test arrays that are typedef'd.
Diffstat (limited to 'gdb/testsuite')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 7 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/printcmds.c | 8 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/printcmds.exp | 17 |
3 files changed, 31 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 101cb69..e4e51d0 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2000-03-14 Elena Zannoni <ezannoni@kwikemart.cygnus.com> + + * gdb.base/printcmds.c: Add typedeffed arrays. + + * gdb.base/printcmds.exp (test_print_typedef_arrays): New + procedure to test arrays that are typedef'd. + 2000-03-13 James Ingham <jingham@leda.cygnus.com> * lib/gdb.exp: Fix the gdbtk_start routine to correctly find all diff --git a/gdb/testsuite/gdb.base/printcmds.c b/gdb/testsuite/gdb.base/printcmds.c index 2708074..f49c3eb 100644 --- a/gdb/testsuite/gdb.base/printcmds.c +++ b/gdb/testsuite/gdb.base/printcmds.c @@ -59,6 +59,12 @@ unsigned char ctable2[] = { /* Single and multidimensional arrays to test access and printing of array members. */ +typedef int ArrayInt [10]; +ArrayInt a1 = {2,4,6,8,10,12,14,16,18,20}; + +typedef char ArrayChar [5]; +ArrayChar a2 = {'a','b','c','d','\0'}; + int int1dim[12] = {0,1,2,3,4,5,6,7,8,9,10,11}; int int2dim[3][4] = {{0,1,2,3},{4,5,6,7},{8,9,10,11}}; int int3dim[2][3][2] = {{{0,1},{2,3},{4,5}},{{6,7},{8,9},{10,11}}}; @@ -97,5 +103,5 @@ int main () /* Prevent AIX linker from removing variables. */ return ctable1[0] + ctable2[0] + int1dim[0] + int2dim[0][0] + int3dim[0][0][0] + int4dim[0][0][0][0] + teststring[0] + - *parrays -> array1; + *parrays -> array1 + a1[0] + a2[0]; } diff --git a/gdb/testsuite/gdb.base/printcmds.exp b/gdb/testsuite/gdb.base/printcmds.exp index 79c6bc6..3ea3b90 100644 --- a/gdb/testsuite/gdb.base/printcmds.exp +++ b/gdb/testsuite/gdb.base/printcmds.exp @@ -552,6 +552,22 @@ proc test_print_int_arrays {} { " = {{{{0, 1}, {2, 3}, {4, 5}}, {{6, 7}, {8, 9}, {10, 11}}}}" } +proc test_print_typedef_arrays {} { + global gdb_prompt + + gdb_test "set print elements 24" "" + + gdb_test "p a1" \ + " = {2, 4, 6, 8, 10, 12, 14, 16, 18, 20}" + gdb_test "p a1\[0\]" " = 2" + gdb_test "p a1\[9\]" " = 20" + + gdb_test "p a2" \ + " = \"abcd\"" + gdb_test "p a2\[0\]" " = 97 'a'" + gdb_test "p a2\[3\]" " = 100 'd'" +} + proc test_artificial_arrays {} { # Send \026@ instead of just @ in case the kill character is @. gdb_test "p int1dim\[0\]\026@2" " = {0, 1}" {p int1dim[0]@2} @@ -691,6 +707,7 @@ if [set_lang_c] then { test_print_repeats_10 test_print_strings test_print_int_arrays + test_print_typedef_arrays test_artificial_arrays test_print_char_arrays # We used to do the runto main here. |