1# Copyright (C) 2012-2023 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 16load_lib gdbserver-support.exp 17 18# We test for skip_shlib_tests in this test because without a main 19# exec file we only have the exec target loaded if shared libraries 20# are present. 21if {[skip_gdbserver_tests] || [skip_shlib_tests]} { 22 return 23} 24 25standard_testfile server.c 26if [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] { 27 return -1 28} 29 30# Make sure we're disconnected, in case we're testing with an 31# extended-remote board, therefore already connected. 32gdb_test "disconnect" ".*" 33 34gdb_test_no_output "set remote pid-to-exec-file-packet off" 35gdb_test "file" ".*" "file" \ 36 {Discard symbol table from `.*'\? \(y or n\) } "y" 37gdbserver_run "" 38gdb_test "set sysroot remote:" 39gdb_test "info files" "\r\nLocal exec file:\r\n\t<no file loaded>" 40