Index: gdb/testsuite/gdb.base/filesym.exp |
diff --git a/gdb/testsuite/gdb.base/filesym.exp b/gdb/testsuite/gdb.base/filesym.exp |
new file mode 100644 |
index 0000000000000000000000000000000000000000..af87d97edb3fbecac51528b3f960e934046e5638 |
--- /dev/null |
+++ b/gdb/testsuite/gdb.base/filesym.exp |
@@ -0,0 +1,51 @@ |
+# 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 |
+# the Free Software Foundation; either version 3 of the License, or |
+# (at your option) any later version. |
+# |
+# This program is distributed in the hope that it will be useful, |
+# but WITHOUT ANY WARRANTY; without even the implied warranty of |
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
+# GNU General Public License for more details. |
+# |
+# 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 series of completion tests checks the completion output |
+# on a name which is potentially both a symbol name and a file name. |
+ |
+standard_testfile |
+ |
+if {[prepare_for_testing $testfile.exp $testfile $srcfile debug]} { |
+ return -1 |
+} |
+ |
+# Test completion list for "filesy". We expect the immediate result to |
+# complete to "filesym"; completing again, we expect the symbol name and the |
+# filename (in that order). |
+ |
+set tst "complete on \"filesy\"" |
+send_gdb "break filesy\t" |
+gdb_test_multiple "" $tst { |
+ -re "break filesy\\\x07m\$" { |
+ pass $tst |
+ |
+ # Now ask for the completion list |
+ set tst "completion list for \"filesym\"" |
+ send_gdb "\t\t" |
+ gdb_test_multiple "" $tst { |
+ -re "\\\x07\r\nfilesym\[ \t\]+filesym.c\[ \t\]+\r\n$gdb_prompt " { |
+ pass $tst |
+ |
+ # Flush the rest of the output by creating the breakpoint. |
+ # This ensures this file passes testsuite/12649. |
+ send_gdb "\n" |
+ gdb_test "" "Breakpoint 1.*" "set breakpoint at filesym" |
+ } |
+ } |
+ } |
+} |
+ |
+unset -nocomplain tst |