gdb/testsuite: remove use of then keyword from gdb.arch/*.exp

[thirdparty/binutils-gdb.git] / gdb / testsuite / gdb.arch / powerpc-aix-prologue.exp

diff --git a/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp b/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
index ea56434b83daba5791ea5e60a011415dc0ac4cd8..bd959bb056b015db4c1d8092656d1f00b0fb9b89 100644 (file)
--- a/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
+++ b/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
@@ -1,4 +1,4 @@
-# Copyright 2004-2019 Free Software Foundation, Inc.
+# Copyright 2004-2022 Free Software Foundation, Inc.
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -18,7 +18,7 @@
 # Test rs6000 prologue analyzer.
 
 
-if ![istarget "powerpc-*-aix*"] then {
+if {![istarget "powerpc-*-aix*"]} {
     verbose "Skipping powerpc-aix prologue tests."
     return
 }
@@ -62,7 +62,7 @@ proc insert_breakpoint {function expected_location} {
     # 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"