GDB 7.6.50

gdb/testsuite/gdb.base/func-ptr.exp

Index: gdb/testsuite/gdb.base/func-ptr.exp
diff --git a/gdb/testsuite/gdb.base/set-noassign.exp b/gdb/testsuite/gdb.base/func-ptr.exp
similarity index 62%
copy from gdb/testsuite/gdb.base/set-noassign.exp
copy to gdb/testsuite/gdb.base/func-ptr.exp
index 5eba8704aae3ada6da9c33f18aaa13c3d37ce13d..b7351bf932b1ec2c56e676f547196b5067d7ed2e 100644
--- a/gdb/testsuite/gdb.base/set-noassign.exp
+++ b/gdb/testsuite/gdb.base/func-ptr.exp
@@ -1,4 +1,4 @@
-# Copyright 2012 Free Software Foundation, Inc.
+# Copyright 2013 Free Software Foundation, Inc.
 
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -13,20 +13,18 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
+# This testcase exercises bug 15695.
+# Trying to print foo->bar if foo is a pointer to a typedef of a pointer
+# to a function will put gdb into an infinite loop.
 
-if { [prepare_for_testing set-noassign.exp "set-noassign" start.c {debug nowarnings}] } {
+if { [prepare_for_testing func-ptr.exp "func-ptr" {func-ptr.c} {debug}] } {
     return -1
 }
 
-if ![runto_main] then {
+if ![runto_main] {
     fail "Can't run to main"
     return 0
 }
 
-# Verify that set command without assignment emits a warning.
-#
-gdb_test "set language ada" ".*" "set language ada"
-
-gdb_test "set x=3" \
-	"warning: Expression is not an assignment \\(and might have no effect\\)" \
-	"warning for set without assignment"
+# This would put gdb into an infinite loop.
+gdb_test "print pbar->baz" "Attempt to extract .*"