1# Copyright 2014-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 16# This file is part of the gdb testsuite. 17 18# This test exercises set/show disassembler-options results are preserved 19# across multiple set architecture calls. 20 21if {![istarget "arm*-*-*"]} { 22 verbose "Skipping ARM disassembler options." 23 return 24} 25 26gdb_exit 27gdb_start 28 29set option "reg-names-gcc,force-thumb" 30set arch1 "armv2" 31set arch2 "armv5" 32 33gdb_test "set architecture $arch1" \ 34 "The target architecture is set to \"$arch1\"\." \ 35 "set architecture $arch1" 36 37gdb_test_no_output "set disassembler-options" 38gdb_test "show disassembler-options" \ 39 "The current disassembler options are ''.*" \ 40 "show NULL disassembler-options" 41 42gdb_test_no_output "set disassembler-options $option" 43gdb_test "show disassembler-options" \ 44 "The current disassembler options are '$option'.*" \ 45 "show disassembler-options $option" 46 47# Change architectures and verify the disassembler options have been preserved. 48 49gdb_test "set architecture $arch2" \ 50 "The target architecture is set to \"$arch2\"\." \ 51 "set architecture $arch2" 52 53gdb_test "show disassembler-options" \ 54 "The current disassembler options are '$option'.*" \ 55 "show disassembler-options $option, modified architecture" 56 57