ctti.exp revision 1.1
1# Copyright 1998-2014 Free Software Foundation, Inc. 2 3# This program is free software; you can redistribute it and/or modify 4# it under the terms of the GNU General Public License as published by 5# the Free Software Foundation; either version 3 of the License, or 6# (at your option) any later version. 7# 8# This program is distributed in the hope that it will be useful, 9# but WITHOUT ANY WARRANTY; without even the implied warranty of 10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 11# GNU General Public License for more details. 12# 13# You should have received a copy of the GNU General Public License 14# along with this program. If not, see <http://www.gnu.org/licenses/>. 15 16# This file is part of the gdb testsuite 17# file written by Elena Zannoni (ezannoni@cygnus.com) 18# rewritten by Michael Chastain (mec.gnu@mindspring.com) 19# 20# source files cttiadd.cc, cttiadd1.cc, cttiadd2.cc, cttiadd3.cc 21 22# Call to template instantiations. 23 24if { [skip_cplus_tests] } { continue } 25 26standard_testfile cttiadd.cc cttiadd1.cc cttiadd2.cc cttiadd3.cc 27 28if [get_compiler_info "c++"] { 29 return -1 30} 31 32if {[prepare_for_testing $testfile.exp $testfile \ 33 [list $srcfile $srcfile2 $srcfile3 $srcfile4] {debug c++}]} { 34 return -1 35} 36 37if ![runto_main] then { 38 perror "couldn't run to breakpoint" 39 continue 40} 41 42gdb_breakpoint [gdb_get_line_number "marker add1"] 43gdb_continue_to_breakpoint "marker add1" 44 45gdb_test "print c" "\\$\[0-9\]+ = 194 .*" 46gdb_test "print f" "\\$\[0-9\]+ = 9" 47gdb_test "print i" "\\$\[0-9\]+ = 4" 48 49# TODO: this needs more work before actually deploying it. 50# So bail out here. 51 52if { [ test_compiler_info gcc-*] } then { continue } 53 54gdb_test_multiple "print add<int>(2,2)" "print add<int>(2,2)" { 55 -re "\\$\[0-9\]+ = 4\r\n$gdb_prompt $" { 56 pass "print add<int>(2,2)" 57 } 58 -re "No symbol \"add<int>\" in current context.\r\n$gdb_prompt $" { 59 # TODO: kfail or xfail this 60 fail "print add<int>(2,2)" 61 } 62} 63 64# Note: 2.25 and 4.5 are exactly representable in IEEE-ish formats 65gdb_test_multiple "print add<float>(2.25,2.25)" "print add<float>(2.25,2.25)" { 66 -re "\\$\[0-9\]+ = 4\\.5\r\n$gdb_prompt $" { 67 pass "print add<float>(2.25,2.25)" 68 } 69 -re "No symbol \"add<float>\" in current context.\r\n$gdb_prompt $" { 70 # TODO: kfail or xfail this 71 fail "print add<float>(2.25,2.25)" 72 } 73} 74 75gdb_test_multiple "print add<unsigned char>('A','A')" "print add<unsigned char>('A','A')" { 76 -re "\\$\[0-9\]+ = 130 .*\r\n$gdb_prompt $" { 77 pass "print add<unsigned char>('A','A')" 78 } 79 -re "No symbol \"add<unsigned char>\" in current context.\r\n$gdb_prompt $" { 80 # TODO: kfail or xfail this 81 fail "print add<unsigned char>('A','A')" 82 } 83} 84 85gdb_test_multiple "print add2<int>(2,2)" "print add2<int>(2,2)" { 86 -re "\\$\[0-9\]+ = 4\r\n$gdb_prompt $" { 87 pass "print add2<int>(2,2)" 88 } 89 -re "No symbol \"add2<int>\" in current context.\r\n$gdb_prompt $" { 90 # TODO: kfail or xfail this 91 fail "print add2<int>(2,2)" 92 } 93} 94 95gdb_test_multiple "print add2<float>(2.25,2.25)" "print add2<float>(2.25,2.25)" { 96 -re "\\$\[0-9\]+ = 4\\.5\r\n$gdb_prompt $" { 97 pass "print add2<float>(2.25,2.25)" 98 } 99 -re "No symbol \"add2<float>\" in current context.\r\n$gdb_prompt $" { 100 # TODO: kfail or xfail this 101 fail "print add2<float>(2.25,2.25)" 102 } 103} 104 105gdb_test_multiple "print add2<unsigned char>('A','A')" "print add2<unsigned char>('A','A')" { 106 -re "\\$\[0-9]+ = 130 .*$gdb_prompt $" { 107 pass "print add2<unsigned char>('A','A')" 108 } 109 -re "No symbol \"add2<unsigned char>\" in current context.\r\n$gdb_prompt $" { 110 # TODO: kfail or xfail this 111 fail "print add2<unsigned char>('A','A')" 112 } 113} 114 115gdb_test_multiple "print add3<int>(2,2)" "print add3<int>(2,2)" { 116 -re "\\$\[0-9\]+ = 4\r\n$gdb_prompt $" { 117 pass "print add3<int>(2,2)" 118 } 119 -re "No symbol \"add3<int>\" in current context.\r\n$gdb_prompt $" { 120 # TODO: kfail or xfail this 121 fail "print add3<int>(2,2)" 122 } 123} 124 125gdb_test_multiple "print add3<float>(2.25,2.25)" "print add3<float>(2.25,2.25)" { 126 -re "\\$\[0-9\]+ = 4\\.5\r\n$gdb_prompt $" { 127 pass "print add3<float>(2.25,2.25)" 128 } 129 -re "No symbol \"add3<float>\" in current context.\r\n$gdb_prompt $" { 130 # TODO: kfail or xfail this 131 fail "print add3<float>(2.25,2.25)" 132 } 133} 134 135gdb_test_multiple "print add3<unsigned char>('A','A')" "print add3<unsigned char>('A','A')" { 136 -re "\\$\[0-9]+ = 130 .*$gdb_prompt $" { 137 pass "print add3<unsigned char>('A','A')" 138 } 139 -re "No symbol \"add3<unsigned char>\" in current context.\r\n$gdb_prompt $" { 140 # TODO: kfail or xfail this 141 fail "print add3<unsigned char>('A','A')" 142 } 143} 144 145gdb_test_multiple "print add4<int>(2,2)" "print add4<int>(2,2)" { 146 -re "\\$\[0-9\]+ = 4\r\n$gdb_prompt $" { 147 pass "print add4<int>(2,2)" 148 } 149 -re "No symbol \"add4<int>\" in current context.\r\n$gdb_prompt $" { 150 # TODO: kfail or xfail this 151 fail "print add4<int>(2,2)" 152 } 153} 154 155gdb_test_multiple "print add4<float>(2.25,2.25)" "print add4<float>(2.25,2.25)" { 156 -re "\\$\[0-9\]+ = 4\\.5\r\n$gdb_prompt $" { 157 pass "print add4<float>(2.25,2.25)" 158 } 159 -re "No symbol \"add4<float>\" in current context.\r\n$gdb_prompt $" { 160 # TODO: kfail or xfail this 161 fail "print add4<float>(2.25,2.25)" 162 } 163} 164 165gdb_test_multiple "print add4<unsigned char>('A','A')" "print add4<unsigned char>('A','A')" { 166 -re "\\$\[0-9]+ = 130 .*$gdb_prompt $" { 167 pass "print add4<unsigned char>('A','A')" 168 } 169 -re "No symbol \"add4<unsigned char>\" in current context.\r\n$gdb_prompt $" { 170 # TODO: kfail or xfail this 171 fail "print add4<unsigned char>('A','A')" 172 } 173} 174