diff options
| author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2015-10-27 06:08:45 +0100 |
|---|---|---|
| committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2015-10-27 06:08:45 +0100 |
| commit | 5e2e7507b4ef8410501452224d98071657ea2d53 (patch) | |
| tree | 52adc0d233fc5a9f948fe4535ea0d4735700e407 /gdb/testsuite | |
| parent | a04a15f586590f1969ab31478f0b04243f760769 (diff) | |
| download | gdb-5e2e7507b4ef8410501452224d98071657ea2d53.zip gdb-5e2e7507b4ef8410501452224d98071657ea2d53.tar.gz gdb-5e2e7507b4ef8410501452224d98071657ea2d53.tar.bz2 | |
Fix access_to_packed_array.exp typos/errors
Running ./gdb.ada/access_to_packed_array.exp ...
ERROR: tcl error sourcing ./gdb.ada/access_to_packed_array.exp.
ERROR: extra characters after close-quote
while executing
"gdb_test "print pack.a" "\\(0 => 1, 2, 3, 4, 5, 6, 7, 8, 9, 10\\)")"
(file "./gdb.ada/access_to_packed_array.exp" line 29)
invoked from within
"source ./gdb.ada/access_to_packed_array.exp"
("uplevel" body line 1)
invoked from within
"uplevel #0 source ./gdb.ada/access_to_packed_array.exp"
invoked from within
"catch "uplevel #0 source $test_file_name""
Unrelated to the typos I have changed the print expectations s/"x"/" = x"/
as for example expectation "3" should not match " = 43".
2015-10-27 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.ada/access_to_packed_array.exp: Fix typos erroring the testfile.
Diffstat (limited to 'gdb/testsuite')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/access_to_packed_array.exp | 8 |
2 files changed, 8 insertions, 4 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 89c453c..090d782 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2015-10-27 Jan Kratochvil <jan.kratochvil@redhat.com> + + * gdb.ada/access_to_packed_array.exp: Fix typos erroring the testfile. + 2015-10-26 Doug Evans <dje@google.com> PR symtab/17391 diff --git a/gdb/testsuite/gdb.ada/access_to_packed_array.exp b/gdb/testsuite/gdb.ada/access_to_packed_array.exp index 0dca780..1bf3e22 100644 --- a/gdb/testsuite/gdb.ada/access_to_packed_array.exp +++ b/gdb/testsuite/gdb.ada/access_to_packed_array.exp @@ -26,8 +26,8 @@ clean_restart ${testfile} set bp_location [gdb_get_line_number "BREAK" ${testdir}/foo.adb] runto "foo.adb:$bp_location" -gdb_test "print pack.a" "\\(0 => 1, 2, 3, 4, 5, 6, 7, 8, 9, 10\\)") -gdb_test "pack.aa" "\\(access pack\\.array_type\\) 0x.* <pack\\.a>") +gdb_test "print pack.a" " = \\(0 => 1, 2, 3, 4, 5, 6, 7, 8, 9, 10\\)" +gdb_test "print pack.aa" " = \\(access pack\\.array_type\\) 0x.* <pack\\.a>" -gdb_test "pack.a(2)" "3" -gdb_test "pack.aa(2)" "3" +gdb_test "print pack.a(2)" " = 3" +gdb_test "print pack.aa(2)" " = 3" |