[PowerPC] Fix "info vector" test in gdb.arch/altivec-regs.exp
authorPedro Franco de Carvalho <pedromfc@linux.ibm.com>
Mon, 14 Jan 2019 19:28:53 +0000 (17:28 -0200)
committerPedro Franco de Carvalho <pedromfc@linux.ibm.com>
Mon, 14 Jan 2019 19:28:53 +0000 (17:28 -0200)
This patch fixes one of the tests in gdb.arch/altivec-regs.exp that
was passing an incorrect list to gdb_expect_list, which always
matched.

gdb/testsuite/ChangeLog:
2019-01-14  Pedro Franco de Carvalho  <pedromfc@linux.ibm.com>

* gdb.arch/altivec-regs.exp: Fix the list passed to
gdb_expect_list when testing "info vector".

gdb/testsuite/ChangeLog
gdb/testsuite/gdb.arch/altivec-regs.exp

index a6a8ec03ad6dd32ed4ee9e83ce0afcafc3364549..621362f7f01226c1e2339a83f330722d6e23507e 100644 (file)
@@ -1,3 +1,8 @@
+2019-01-14  Pedro Franco de Carvalho  <pedromfc@linux.ibm.com>
+
+       * gdb.arch/altivec-regs.exp: Fix the list passed to
+       gdb_expect_list when testing "info vector".
+
 2019-01-12  Andrew Burgess  <andrew.burgess@embecosm.com>
 
        * gdb.base/style.exp: Don't include path in testname.
index 5647fb5e862559139a69569dff678da075183cd4..d23039244f99af095d35793aa621cb91daef776e 100644 (file)
@@ -117,47 +117,14 @@ gdb_test "print \$vrsave" ".* = 1" "print vrsave"
 gdb_test "print \$vscr" ".* = 1" "print vscr"
 
 for {set i 0} {$i < 32} {incr i 1} {
-         set pattern$i ".*vr$i.*"
-         append pattern$i $vector_register
+    lappend pattern_list "vr$i\[ \t\]+$vector_register"
 }
 
+lappend pattern_list "vscr\[ \t\]+0x1"
+lappend pattern_list "vrsave\[ \t\]+0x1"
+
 send_gdb "info vector\n"
-gdb_expect_list "info vector" ".*$gdb_prompt $" {
-[$pattern0]
-[$pattern1]
-[$pattern2]
-[$pattern3]
-[$pattern4]
-[$pattern5]
-[$pattern6]
-[$pattern7]
-[$pattern8]
-[$pattern9]
-[$pattern10]
-[$pattern11]
-[$pattern12]
-[$pattern13]
-[$pattern14]
-[$pattern15]
-[$pattern16]
-[$pattern17]
-[$pattern18]
-[$pattern19]
-[$pattern20]
-[$pattern21]
-[$pattern22]
-[$pattern23]
-[$pattern24]
-[$pattern25]
-[$pattern26]
-[$pattern27]
-[$pattern28]
-[$pattern29]
-[$pattern30]
-[$pattern31]
-"\[ \t\n\r\]+vscr\[ \t\]+0x1"
-"\[ \t\n\r\]+vrsave\[ \t\]+0x1"
-}
+gdb_expect_list "info vector" ".*$gdb_prompt $" $pattern_list
 
 gdb_test "break vector_fun" \
  "Breakpoint 2 at.*altivec-regs.c, line \[0-9\]+\\." \