dynarr-ptr.exp: Add ptype tests.
This patch adds a number of "ptype" tests to gdb.dwarf2/dynarr-ptr.exp. gdb/testsuite/ChangeLog: * gdb.dwarf2/dynarr-ptr.exp: Add a few ptype tests.
This commit is contained in:
parent
eb47903935
commit
963349348e
2 changed files with 28 additions and 0 deletions
|
@ -1,3 +1,7 @@
|
|||
2014-09-10 Joel Brobecker <brobecker@adacore.com>
|
||||
|
||||
* gdb.dwarf2/dynarr-ptr.exp: Add a few ptype tests.
|
||||
|
||||
2014-09-10 Joel Brobecker <brobecker@adacore.com>
|
||||
|
||||
* gdb.dwarf2/dynarr-ptr.exp: Add 'first, 'last and 'length tests.
|
||||
|
|
|
@ -155,6 +155,9 @@ gdb_test "print foo.three_ptr.all'last" \
|
|||
gdb_test "print foo.three_ptr.all'length" \
|
||||
" = 3"
|
||||
|
||||
gdb_test "ptype foo.three_ptr.all" \
|
||||
" = array \\(<>\\) of integer"
|
||||
|
||||
# foo.three_ptr
|
||||
|
||||
gdb_test "print foo.three_ptr(1)" \
|
||||
|
@ -175,6 +178,9 @@ gdb_test "print foo.three_ptr'last" \
|
|||
gdb_test "print foo.three_ptr'length" \
|
||||
" = 3"
|
||||
|
||||
gdb_test "ptype foo.three_ptr" \
|
||||
" = access array \\(<>\\) of integer"
|
||||
|
||||
# foo.three_ptr_tdef.all
|
||||
|
||||
gdb_test "print foo.three_ptr_tdef.all" \
|
||||
|
@ -198,6 +204,9 @@ gdb_test "print foo.three_ptr_tdef.all'last" \
|
|||
gdb_test "print foo.three_ptr_tdef.all'length" \
|
||||
" = 3"
|
||||
|
||||
gdb_test "ptype foo.three_ptr_tdef.all" \
|
||||
" = array \\(<>\\) of integer"
|
||||
|
||||
# foo.three_ptr_tdef
|
||||
|
||||
gdb_test "print foo.three_ptr_tdef(1)" \
|
||||
|
@ -218,6 +227,9 @@ gdb_test "print foo.three_ptr_tdef'last" \
|
|||
gdb_test "print foo.three_ptr_tdef'length" \
|
||||
" = 3"
|
||||
|
||||
gdb_test "ptype foo.three_ptr_tdef" \
|
||||
" = access array \\(<>\\) of integer"
|
||||
|
||||
# foo.five_ptr.all
|
||||
|
||||
gdb_test "print foo.five_ptr.all" \
|
||||
|
@ -247,6 +259,9 @@ gdb_test "print foo.five_ptr.all'last" \
|
|||
gdb_test "print foo.five_ptr.all'length" \
|
||||
" = 5"
|
||||
|
||||
gdb_test "ptype foo.five_ptr.all" \
|
||||
" = array \\(<>\\) of integer"
|
||||
|
||||
# foo.five_ptr
|
||||
|
||||
gdb_test "print foo.five_ptr(2)" \
|
||||
|
@ -273,6 +288,9 @@ gdb_test "print foo.five_ptr'last" \
|
|||
gdb_test "print foo.five_ptr'length" \
|
||||
" = 5"
|
||||
|
||||
gdb_test "ptype foo.five_ptr" \
|
||||
" = access array \\(<>\\) of integer"
|
||||
|
||||
# foo.five_ptr_tdef.all
|
||||
|
||||
gdb_test "print foo.five_ptr_tdef.all" \
|
||||
|
@ -302,6 +320,9 @@ gdb_test "print foo.five_ptr_tdef.all'last" \
|
|||
gdb_test "print foo.five_ptr_tdef.all'length" \
|
||||
" = 5"
|
||||
|
||||
gdb_test "ptype foo.five_ptr_tdef.all" \
|
||||
" = array \\(<>\\) of integer"
|
||||
|
||||
# foo.five_ptr_tdef
|
||||
|
||||
gdb_test "print foo.five_ptr_tdef(2)" \
|
||||
|
@ -327,3 +348,6 @@ gdb_test "print foo.five_ptr_tdef'last" \
|
|||
|
||||
gdb_test "print foo.five_ptr_tdef'length" \
|
||||
" = 5"
|
||||
|
||||
gdb_test "ptype foo.five_ptr_tdef" \
|
||||
" = access array \\(<>\\) of integer"
|
||||
|
|
Loading…
Reference in a new issue