From ed7fbdd033a272ff0d7d82c2153d7d0fade80d26 Mon Sep 17 00:00:00 2001 From: Andrew Burgess Date: Mon, 14 Nov 2022 10:55:35 +0000 Subject: gdb/testsuite: remove use of then keyword from gdb.ada/*.exp The canonical form of 'if' in modern TCL is 'if {} {}'. But there's still a bunch of places in the testsuite where we make use of the 'then' keyword, and sometimes these get copies into new tests, which just spreads poor practice. This commit removes all use of the 'then' keyword from the gdb.ada/ test script directory. There should be no changes in what is tested after this commit. --- gdb/testsuite/gdb.ada/info_exc.exp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gdb/testsuite/gdb.ada/info_exc.exp') diff --git a/gdb/testsuite/gdb.ada/info_exc.exp b/gdb/testsuite/gdb.ada/info_exc.exp index 4e0059a..c0a9e4d 100644 --- a/gdb/testsuite/gdb.ada/info_exc.exp +++ b/gdb/testsuite/gdb.ada/info_exc.exp @@ -25,7 +25,7 @@ if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } clean_restart ${testfile} -if ![runto_main] then { +if {![runto_main]} { return 0 } -- cgit v1.1