Index: gdb/testsuite/gdb.python/py-typeprint.exp |
diff --git a/gdb/testsuite/gdb.python/py-typeprint.exp b/gdb/testsuite/gdb.python/py-typeprint.exp |
new file mode 100644 |
index 0000000000000000000000000000000000000000..8e1b3792b34f7714c40ac1aacc92b82012781bde |
--- /dev/null |
+++ b/gdb/testsuite/gdb.python/py-typeprint.exp |
@@ -0,0 +1,55 @@ |
+# Copyright (C) 2012-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/>. |
+ |
+if { [skip_cplus_tests] } { continue } |
+ |
+load_lib gdb-python.exp |
+load_lib cp-support.exp |
+ |
+standard_testfile .cc |
+ |
+if {[prepare_for_testing $testfile.exp $testfile $srcfile {debug c++}]} { |
+ return -1 |
+} |
+ |
+if { [skip_python_tests] } { continue } |
+ |
+set remote_python_file [gdb_remote_download host \ |
+ ${srcdir}/${subdir}/${testfile}.py] |
+ |
+gdb_test_no_output "python exec (open ('${remote_python_file}').read ())" \ |
+ "python exec (open ('[file tail ${remote_python_file}]').read ())" |
+ |
+cp_test_ptype_class s "basic test" "class" "templ<string>" { |
+ { field public "T x;" } |
+ { field public "templ<T> *value;" } |
+} "" {} "" |
+ |
+cp_test_ptype_class s "raw test" "class" "templ<basic_string>" { |
+ { field public "basic_string x;" } |
+ { field public "templ<basic_string> *value;" } |
+} "" {} "/r" |
+ |
+gdb_test_no_output "disable type-printer string" |
+gdb_test "whatis bs" "basic_string" "whatis with disabled printer" |
+ |
+gdb_test "info type-printers" "Global type printers:.*string.*disabled.*" |
+ |
+gdb_test_no_output "enable type-printer string" |
+gdb_test "whatis bs" "string" "whatis with enabled printer" |
+ |
+gdb_test "whatis s" "templ<string>" |
+ |
+remote_file host delete ${remote_python_file} |