gdb/testsuite/

	* gdb.cp/templates.exp (test_template_typedef): Import gdb_prompt.
	(print destructor of template typedef): Extend it for gcc/51668 XFAIL.
	(verify GCC PR debug/51668): New test.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 4964e4ed4de676ad55a6290d8d9faa4a9920f177..5b5aee3517c4ff99f505f24febe1e3c9557ec3f4 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2011-12-23  Jan Kratochvil  <jan.kratochvil@redhat.com>
+
+       * gdb.cp/templates.exp (test_template_typedef): Import gdb_prompt.
+       (print destructor of template typedef): Extend it for gcc/51668 XFAIL.
+       (verify GCC PR debug/51668): New test.
+
 2011-12-23  Kevin Pouget  <kevin.pouget@st.com>
 
        Introduce gdb.FinishBreakpoint in Python.

diff --git a/gdb/testsuite/gdb.cp/templates.exp b/gdb/testsuite/gdb.cp/templates.exp
index cc78422483ea8e68dca32e39fb2744904a7c1329..f9bbb435904584358a53fb9a97e72c31f5a0b685 100644 (file)
--- a/gdb/testsuite/gdb.cp/templates.exp
+++ b/gdb/testsuite/gdb.cp/templates.exp
@@ -202,12 +202,32 @@ proc test_template_calls {} {
 }
 
 proc test_template_typedef {} {
+    global gdb_prompt
 
     gdb_test "print intBazOne::baz" ".*baz\\(int, int\\)>" \
        "print method of template typedef"
 
-    gdb_test "print intBazOne::~Baz" ".*~Baz(\\(\\))?>" \
-       "print destructor of template typedef"
+    set test "print destructor of template typedef"
+    gdb_test_multiple "print intBazOne::~Baz" $test {
+       -re "~Baz(\\(\\))?>\r\n$gdb_prompt $" {
+           pass $test
+       }
+       -re "There is no field named ~Baz\r\n$gdb_prompt $" {
+           set test2 "verify GCC PR debug/51668"
+           gdb_test_multiple "whatis intBazOne" $test2 {
+               -re "type = Baz<int, \\(char\\)'\\\\001'>\r\n$gdb_prompt $" {
+                   setup_xfail gcc/51668 "*-*-*"
+                   xfail $test
+                   pass $test2
+               }
+               -re "\r\n$gdb_prompt $" {
+                   # Some unexpected response.
+                   fail $test
+                   fail $test2
+               }
+           }
+       }
+    }
 }
 
 proc test_template_args {} {