[binutils-gdb] Fix access_to_packed_array.exp typos/errors

[Jan Kratochvil <jkratoch at sourceware dot org>]

https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=5e2e7507b4ef8410501452224d98071657ea2d53

commit 5e2e7507b4ef8410501452224d98071657ea2d53
Author: Jan Kratochvil <jan.kratochvil@redhat.com>
Date:   Tue Oct 27 06:08:45 2015 +0100

    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.

Diff:
---
 gdb/testsuite/ChangeLog                          | 4 ++++
 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"