# Test explicitly unwinding the PC DWARF register on aarch64
-if {![is_aarch64_target]} then {
+if {![is_aarch64_target]} {
verbose "Skipping ${gdb_test_file_name}."
return
}
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if ![istarget "alpha*-*-*"] then {
+if {![istarget "alpha*-*-*"]} {
verbose "Skipping alpha step tests."
return
}
# Restart the program from scratch. If GDB got confused during one
# of the previous tests, this makes sure that it doesn't affect
# this series of tests.
- if ![runto_main] then {
+ if {![runto_main]} {
return 0
}
# This file uses altivec-abi.c for input.
#
-if {![istarget "powerpc*"] || [skip_altivec_tests]} then {
+if {![istarget "powerpc*"] || [skip_altivec_tests]} {
verbose "Skipping altivec abi tests."
return
}
gdb_load ${binfile}
# Run to `main' where we begin our tests.
- if ![runto_main] then {
+ if {![runto_main]} {
return -1
}
#
-if {![istarget "powerpc*"] || [skip_altivec_tests]} then {
+if {![istarget "powerpc*"] || [skip_altivec_tests]} {
verbose "Skipping altivec register tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
clean_restart ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
gdb_test "set displaced-stepping on" ""
gdb_test "show displaced-stepping" ".* displaced stepping .* is on.*"
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
gdb_test "set displaced-stepping on" ""
gdb_test "show displaced-stepping" ".* displaced stepping .* is on.*"
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
clean_restart ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
standard_testfile
-if { ![is_amd64_regs_target] } then {
+if {![is_amd64_regs_target]} {
verbose "Untested x86_64 fs_base and gs_base tests."
return
}
# Test initial values of x87 control registers, before any x87
# instructions have been executed in the inferior.
-if ![is_amd64_regs_target] then {
+if {![is_amd64_regs_target]} {
return
}
clean_restart ${binfile}
# Get things started.
- if ![runto_main] then {
+ if {![runto_main]} {
return 0
}
clean_restart ${binfile}
- if ![runto_main] then {
+ if {![runto_main]} {
return 0
}
clean_restart ${binfile}
- if ![runto_main] then {
+ if {![runto_main]} {
return 0
}
clean_restart ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# 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 {![istarget "arc*-*-*"]} then {
+if {![istarget "arc*-*-*"]} {
verbose "Skipping ARC prologue test."
return
}
# about requirements to actual test cases can be found in corresponding
# assembly file of this test case (arc-decode-insn.S).
-if {![istarget "arc*-*-*"]} then {
+if {![istarget "arc*-*-*"]} {
verbose "Skipping ARC decoder test."
return
}
# Test ARC disassembler options.
-if { ![istarget "arc-*-*"] } then {
+if {![istarget "arc-*-*"]} {
verbose "Skipping ARC disassembler option test."
return
}
# This test exercises set/show disassembler-options results are preserved
# across multiple set architecture calls.
-if {![istarget "arm*-*-*"]} then {
+if {![istarget "arm*-*-*"]} {
verbose "Skipping ARM disassembler options."
return
}
# Test arm displaced stepping.
-if {![is_aarch32_target]} then {
+if {![is_aarch32_target]} {
verbose "Skipping arm displaced stepping tests."
return
}
# which is in library might be compiled in Thumb.
gdb_test_no_output "set displaced-stepping off"
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
#
-if ![istarget "powerpc-*eabispe"] then {
+if {![istarget "powerpc-*eabispe"]} {
verbose "Skipping e500 abi tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Test PowerPC E500 prologue analyzer.
-if ![istarget "powerpc-*"] then {
+if {![istarget "powerpc-*"]} {
verbose "Skipping powerpc E500 prologue tests."
return
}
# instruction at that address (we're not interested in the insn
# itself, but rather at the address printed at the begining of
# the instruction).
- if { $address != "" } then {
+ if {$address != ""} {
gdb_test "x /i $address" \
".*<$function\\+$expected_location>.*" \
"check $function breakpoint address"
#
-if ![istarget "powerpc-*eabispe"] then {
+if {![istarget "powerpc-*eabispe"]} {
verbose "Skipping e500 register tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Test SH backtraces with >256 byte frame stack. (PR:1291)
-if ![istarget "sh-*-*"] then {
+if {![istarget "sh-*-*"]} {
verbose "Skipping SH backtrace tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Observe that the until command doesn't go all the way to sub2.
-if ![istarget "sh-*-*"] then {
+if {![istarget "sh-*-*"]} {
verbose "Skipping SH backtrace tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# from main.
-if ![istarget "sh-*-*"] then {
+if {![istarget "sh-*-*"]} {
verbose "Skipping SH breakpoint test."
return
}
clean_restart ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
clean_restart ${binfile}
}
- if ![runto_main] then {
+ if {![runto_main]} {
return
}
# #define EM_X86_64 62 /* AMD x86-64 architecture */
# patch @0x12: 0x3E -> 0x03
-if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
+if {![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"]} {
verbose "Skipping i386 biarch core test."
return
}
# Test stepping over permanent breakpoints on i386.
-if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
+if {![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"]} {
verbose "Skipping skip over permanent breakpoint on i386 tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
# This file is part of the gdb testsuite.
-if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"])} then {
+if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"])} {
verbose "Skipping i386 byte register tests."
return
}
clean_restart ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Test i386 displaced stepping.
-if { ![is_x86_like_target] } then {
+if {![is_x86_like_target]} {
verbose "Skipping x86 displaced stepping tests."
return
}
gdb_test "set displaced-stepping on" ""
gdb_test "show displaced-stepping" ".* displaced stepping .* is on.*"
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# This test relies on being able to set 4 hardware watchpoints. Since
# that is not a valid assumption across most targets, and we're
# testing a x86 specific bug, skip everywhere else.
-if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
+if {![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"]} {
return 0
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
# Test the x87 floating point information printout.
-if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
+if {![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"]} {
verbose "Skipping i386 tests for x87 floating point support."
return
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Test i386 unwinder.
-if { ![is_x86_like_target] } then {
+if {![is_x86_like_target]} {
verbose "Skipping i386 unwinder tests."
return
}
gdb_test_multiple "info frame" "existence of the CFI inserted register" {
-re "Stack level $gate_n, frame at (0x\[0-9a-f\]+):.*Saved registers:.* ecx at (0x\[0-9a-f\]+),.*" {
pass "existence of the CFI inserted register"
- if { [string compare $expect_out(1,string) $expect_out(2,string)] } then {
+ if {[string compare $expect_out(1,string) $expect_out(2,string)]} {
fail "value of the CFI inserted register"
} else {
pass "value of the CFI inserted register"
# Test inserting breakpoints over permanent breakpoints on i386 and amd64.
-if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
+if {![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"]} {
verbose "Skipping i386 test for multi break at permanent breakpoint location."
return
}
# Test i386 prologue analyzer.
-if { ![is_x86_like_target] } then {
+if {![is_x86_like_target]} {
verbose "Skipping i386 prologue tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# 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 { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
+if {![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"]} {
verbose "Skipping i386 unwinder tests."
return
}
# Test that GDB can handle overlapping sizes of symbols.
-if { ![is_x86_like_target] } then {
+if {![is_x86_like_target]} {
verbose "Skipping i386 unwinder tests."
return
}
# Test that GDB can see the sizes of symbols.
-if { ![is_x86_like_target] } then {
+if {![is_x86_like_target]} {
verbose "Skipping i386 unwinder tests."
return
}
clean_restart $executable
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
clean_restart ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Test i386 unwinder.
-if { ![is_x86_like_target] } then {
+if {![is_x86_like_target]} {
verbose "Skipping i386 unwinder tests."
return
}
# This file is part of the gdb testsuite.
-if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"])} then {
+if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"])} {
verbose "Skipping i386 word register tests."
return
}
clean_restart ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Tests for ARM iWMMXt register setting and fetching.
-if ![istarget "arm*-*-*"] then {
+if {![istarget "arm*-*-*"]} {
verbose "Skipping iWMMXt register tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Test MIPS disassembler options.
-if { ![istarget "mips*-*-*"] } then {
+if {![istarget "mips*-*-*"]} {
verbose "Skipping MIPS disassembler option tests."
return
}
# Test MIPS Floating Point Control Register handling.
-if { ![istarget "mips*-*-*"] } then {
+if {![istarget "mips*-*-*"]} {
verbose "Skipping MIPS Floating Point Control Register tests."
return
}
# Test MIPS Floating Point General Register handling in core files.
-if { ![istarget "mips*-*-*"] } then {
+if {![istarget "mips*-*-*"]} {
verbose "Skipping MIPS Floating Point General Register tests."
return
}
set test "core file FGR register contents"
set core_fgr_contents \
[mips_fpregset_core_fetch_float_registers "retrieve $test"]
- if { $core_fgr_contents == $live_fgr_contents } then {
+ if {$core_fgr_contents == $live_fgr_contents} {
pass $test
} else {
fail $test
# toolchain for a subset of ABIs, so we need to check that a MIPS16
# executable can be built and run at all before we attempt the actual test.
-if { ![istarget "mips*-*-*"] } then {
+if {![istarget "mips*-*-*"]} {
verbose "Skipping MIPS16 thunk support tests."
return
}
global srcdir
global subdir
- if ![string equal "$suffix" ""] then {
+ if {![string equal "$suffix" ""]} {
set suffix "-$suffix"
}
set srcfile ${srcdir}/${subdir}/${filename}.c
set binfile [standard_output_file ${testname}]
set options [list debug nowarnings]
-if { [gdb_compile ${objfiles} ${binfile} executable ${options}] != "" } then {
+if {[gdb_compile ${objfiles} ${binfile} executable ${options}] != ""} {
unsupported "no MIPS16 support in the toolchain."
return
}
set binfile [standard_output_file ${testname}]
set options [list debug nowarnings additional_flags=-fPIC]
-if { [gdb_compile ${objfiles} ${binfile} executable ${options}] == "" } then {
+if {[gdb_compile ${objfiles} ${binfile} executable ${options}] == ""} {
clean_restart ${testname}
gdb_breakpoint inmain
gdb_run_cmd
set options [list debug nowarnings]
gdb_compile ${objfiles} ${binfile} executable ${options}
clean_restart ${testname}
-if ![runto_main] then {
+if {![runto_main]} {
return
}
# Report PASS if VAL is equal to EXP, otherwise report FAIL, using MSG.
proc pass_if_eq { val exp msg } {
- if [string equal "$val" "$exp"] then {
+ if {[string equal "$val" "$exp"]} {
pass "$msg"
} else {
fail "$msg"
# for the same function. If successful, then return the name of the
# function we have stopped in.
proc finish_if_ne { id func want funcs } {
- if ![string equal "$func" "$want"] then {
+ if {![string equal "$func" "$want"]} {
set call "$func"
set want [lindex $funcs 0]
set func [finish_through "$id" [linsert $funcs 0 "$func"]]
return $addr
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
}
set test "core at last insn in foo"
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
gdb_breakpoint "*$foo_last"
}
set test "core at nullified insn"
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
gdb_breakpoint "*$foo_last"
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return
}
# Test rs6000 prologue analyzer.
-if ![istarget "powerpc-*-aix*"] then {
+if {![istarget "powerpc-*-aix*"]} {
verbose "Skipping powerpc-aix prologue tests."
return
}
# instruction at that address (we're not interested in the insn
# itself, but rather at the address printed at the begining of
# the instruction).
- if { $address != "" } then {
+ if {$address != ""} {
gdb_test "x /i $address" \
".*<$function\\+$expected_location>.*" \
"check $function breakpoint address"
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
# Testcase for ppc decimal128 pseudo-registers.
-if ![istarget "powerpc64*-*"] then {
+if {![istarget "powerpc64*-*"]} {
verbose "Skipping powerpc Decimal128 pseudo-registers testcase."
return
}
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
-if { ![runto_main] } then {
+if {![runto_main]} {
return
}
# This test exercises set/show disassembler-options results are preserved
# across multiple set architecture calls.
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC disassembler options."
return
}
# This tests checks that generating and loading a core file preserves
# the correct FPSCR size.
-if {![istarget "powerpc*-*-linux*"]} then {
+if {![istarget "powerpc*-*-linux*"]} {
verbose "Skipping PowerPC test for corefiles with FPSCR."
return
}
clean_restart $binfile
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
# registers are then checked against the saved values, because the
# abort should have reverted the registers to these values.
-if {![istarget "powerpc*-*-linux*"]} then {
+if {![istarget "powerpc*-*-linux*"]} {
verbose "Skipping PowerPC test for HTM registers."
return
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return
}
gdb_test "set radix 0b10000"
gdb_test "set debug displaced"
-if ![runto_main] then {
+if {![runto_main]} {
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
# values, then write to the registers trough GDB, step once, and check
# again if we read back the same values.
-if {![istarget "powerpc*-*-linux*"]} then {
+if {![istarget "powerpc*-*-linux*"]} {
verbose "Skipping PowerPC test for PPR and DSCR registers."
return
}
# Do not run on AIX (where we won't be able to build the tests without
# some surgery) or on PowerPC64 (ditto, dot symbols).
-if {[istarget *-*-aix*] || ![istarget "powerpc-*-*"]} then {
+if {[istarget *-*-aix*] || ![istarget "powerpc-*-*"]} {
verbose "Skipping PowerPC prologue tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Testcase for PR tdep/17379.
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping powerpc-stackless.exp"
return
}
# branch to TAR and check that we stop at the address that we wrote to
# register.
-if {![istarget "powerpc*-*-linux*"]} then {
+if {![istarget "powerpc*-*-linux*"]} {
verbose "Skipping PowerPC test for the TAR register."
return
}
# This test checks that generating and loading a core file preserves
# the correct VSX register state.
-if {![istarget "powerpc*-*-linux*"] || [skip_vsx_tests]} then {
+if {![istarget "powerpc*-*-linux*"] || [skip_vsx_tests]} {
verbose "Skipping PowerPC test for corefiles with VSX registers."
return
}
clean_restart $binfile
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
standard_testfile .s
set objfile [standard_output_file ${testfile}.o]
-if {![istarget "powerpc*-*-*"]} then {
+if {![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC instructions disassembly."
return
}
# Do not run on AIX (where we won't be able to build the tests without
# some surgery) or on PowerPC64 (ditto, dot symbols).
-if {[istarget *-*-aix*] || ![istarget "powerpc*-*-*"]} then {
+if {[istarget *-*-aix*] || ![istarget "powerpc*-*-*"]} {
verbose "Skipping PowerPC prologue tests."
return
}
}
# Run to `main' where we begin our tests.
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Tests for Powerpc Decimal Floating Point registers setting and fetching
-if ![istarget "powerpc*"] then {
+if {![istarget "powerpc*"]} {
verbose "Skipping powerpc decimal floating point register tests."
return
}
# Tests for Powerpc floating point register setting and fetching
-if ![istarget "powerpc*"] then {
+if {![istarget "powerpc*"]} {
verbose "Skipping powerpc floating point register tests."
return
}
# 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 ![istarget "powerpc*"] then {
+if {![istarget "powerpc*"]} {
verbose "Skipping powerpc long-double floating point tests."
return
}
set lines [gdb_compile "${srcdir}/${subdir}/${srcfile}" "$binfile.$name" executable $ccopts]
# We get this warning even with the nowarnings option ...
regsub -all "(^|\n)\[^\n\]*using \[^\n\]* extended precision long double" $lines "" lines
- if { $lines != "" } then {
+ if {$lines != ""} {
return
}
clean_restart ${binfile}.${name}
- if ![runto_main] then {
+ if {![runto_main]} {
return
}
proc do_test { displaced } {
global decimal hex
- if ![runto_main] then {
+ if {![runto_main]} {
return -1
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
global decimal hex
global gdb_prompt inferior_exited_re srcfile srcfile2
- if ![runto_main] then {
+ if {![runto_main]} {
return -1
}
# Test proper disassembling of ARM thumb instructions when reloading a symbol
# file.
-if {![is_aarch32_target]} then {
+if {![is_aarch32_target]} {
verbose "Skipping ARM tests."
return
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
return -1
}
- if ![runto_main] then {
+ if {![runto_main]} {
return 0
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
fail "can't run to main"
return 0
}
# This test exercises set/show disassembler-options results are preserved
# across multiple set architecture calls.
-if {![istarget "s390*-*-*"]} then {
+if {![istarget "s390*-*-*"]} {
verbose "Skipping S390 disassembler options."
return
}
# 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 {![istarget "s390*-*-*"]} then {
+if {![istarget "s390*-*-*"]} {
verbose "Skipping s390 stackless test."
return
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# PC must be extracted from the sigreturn register save area in the
# stack.
-if ![istarget "sparc*-*-linux*"] then {
+if {![istarget "sparc*-*-linux*"]} {
return 0
}
# Basic tests of examining/assigning ADI version tags, and reporting
# precise mismatch.
-if ![istarget "sparc64*-*-linux*"] then {
+if {![istarget "sparc64*-*-linux*"]} {
verbose "Skipping sparc64 ADI test."
return 0
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
# Tests decoding of various sparc64 registers.
# At the moment, only few registers are tested, but more can be added in future.
-if ![istarget "sparc64*-*-linux*"] then {
+if {![istarget "sparc64*-*-linux*"]} {
verbose "Skipping sparc64 register tests."
return 0
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
# Test PC adjustment from Thumb-mode "bx pc" instruction.
-if {![is_aarch32_target]} then {
+if {![is_aarch32_target]} {
verbose "Skipping ARM tests."
return
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
# Test ARM/Thumb prologue analyzer.
-if {![is_aarch32_target]} then {
+if {![is_aarch32_target]} {
verbose "Skipping ARM prologue tests."
return
}
# Run to `main' where we begin our tests.
#
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
# Test single-stepping into incorrectly marked Thumb routine
-if {![is_aarch32_target]} then {
+if {![is_aarch32_target]} {
verbose "Skipping ARM tests."
return
}
return -1
}
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
# Test single stepping over Thumb-2 IT blocks.
-if {![istarget arm*-*eabi*]} then {
+if {![istarget arm*-*eabi*]} {
verbose "Skipping Thumb-2 tests."
return
}
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
-if ![runto_main] then {
+if {![runto_main]} {
return -1
}
#
-if {![istarget "powerpc*"] || [skip_vsx_tests]} then {
+if {![istarget "powerpc*"] || [skip_vsx_tests]} {
verbose "Skipping vsx register tests."
return
}
# Run to `main' where we begin our tests.
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
#
-if {![istarget "powerpc*"] || [skip_vsx_tests]} then {
+if {![istarget "powerpc*"] || [skip_vsx_tests]} {
verbose "Skipping vsr float128 field tests."
return
}
# Run to `main' where we begin our tests.
-if ![runto_main] then {
+if {![runto_main]} {
return 0
}
projects / binutils-gdb.git / commitdiff