1*1424dfb3Schristos# This testcase is part of GDB, the GNU debugger. 2*1424dfb3Schristos# Copyright 2018-2020 Free Software Foundation, Inc. 3*1424dfb3Schristos 4*1424dfb3Schristos# This program is free software; you can redistribute it and/or modify 5*1424dfb3Schristos# it under the terms of the GNU General Public License as published by 6*1424dfb3Schristos# the Free Software Foundation; either version 3 of the License, or 7*1424dfb3Schristos# (at your option) any later version. 8*1424dfb3Schristos# 9*1424dfb3Schristos# This program is distributed in the hope that it will be useful, 10*1424dfb3Schristos# but WITHOUT ANY WARRANTY; without even the implied warranty of 11*1424dfb3Schristos# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12*1424dfb3Schristos# GNU General Public License for more details. 13*1424dfb3Schristos# 14*1424dfb3Schristos# You should have received a copy of the GNU General Public License 15*1424dfb3Schristos# along with this program. If not, see <http://www.gnu.org/licenses/>. 16*1424dfb3Schristos 17*1424dfb3Schristos# Only test C++ if we are able. Always use C. 18*1424dfb3Schristosif { [skip_cplus_tests] || [get_compiler_info "c++"] } { 19*1424dfb3Schristos return -1 20*1424dfb3Schristos} 21*1424dfb3Schristosset lang {c++} 22*1424dfb3Schristos 23*1424dfb3Schristosset debug debug 24*1424dfb3Schristos 25*1424dfb3Schristossource $srcdir/$subdir/infcall-nodebug.exp.tcl 26