gdb/testsuite: remove use of then keyword from gdb.multi/*.exp
[binutils-gdb.git] / gdb / testsuite / gdb.multi / base.exp
index 7f291996ef4ca94a7a92a7a6d4ffcbc69160f2a5..6c5042eb40433354c42ffcbeb40b5661d8beb39e 100644 (file)
@@ -85,7 +85,7 @@ gdb_test_multiple "info inferior 2 3" "info inferior 2 3" {
        exp_continue
     }
     -re "$gdb_prompt $" {
-       if { !$see1 && $see2 && $see3 } then {
+       if {!$see1 && $see2 && $see3} {
            pass "info inferior 2 3"
        } else {
            fail "info inferior 2 3"
@@ -111,7 +111,7 @@ gdb_test_multiple "info inferior 1-2" "info inferior 1-2" {
        exp_continue
     }
     -re "$gdb_prompt $" {
-       if { $see1 && $see2 && !$see3 } then {
+       if {$see1 && $see2 && !$see3} {
            pass "info inferior 1-2"
        } else {
            fail "info inferior 1-2"
@@ -154,7 +154,7 @@ gdb_test "list commonfun" "from goodbye.*" "list commonfun in goodbye"
 # Let's run the hello program.
 gdb_test "inferior 1" ".*" "switch to inferior 1 to run it"
 
-if { ![runto_main] } then {
+if {![runto_main]} {
     return -1
 }
 
@@ -183,7 +183,7 @@ gdb_test_multiple "info inferiors" "check remove-inferiors" {
        exp_continue
     }
     -re "$gdb_prompt $" {
-       if { $see1 && !$see2 && !$see3 } then {
+       if {$see1 && !$see2 && !$see3} {
            pass "check remove-inferiors"
        } else {
            fail "check remove-inferiors"