From 543ea4bde0407150fbdc8a779c5b9c356f3249e5 Mon Sep 17 00:00:00 2001
From: Tom de Vries <tdevries@suse.de>
Date: Sun, 5 Oct 2025 22:50:09 +0200
Subject: [PATCH] [gdb/testsuite, tclint] Fix lib/gdb-utils.exp

---
 gdb/tclint.toml                 | 1 -
 gdb/testsuite/lib/gdb-utils.exp | 5 +++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/gdb/tclint.toml b/gdb/tclint.toml
index e71f2e0c636..088243e4594 100644
--- a/gdb/tclint.toml
+++ b/gdb/tclint.toml
@@ -40,7 +40,6 @@ exclude = [
 "gdb/testsuite/lib/future.exp",
 "gdb/testsuite/lib/gdb.exp",
 "gdb/testsuite/lib/gdbserver-support.exp",
-"gdb/testsuite/lib/gdb-utils.exp",
 "gdb/testsuite/lib/gen-perf-test.exp",
 "gdb/testsuite/lib/mi-support.exp",
 "gdb/testsuite/lib/pascal.exp",
diff --git a/gdb/testsuite/lib/gdb-utils.exp b/gdb/testsuite/lib/gdb-utils.exp
index c24e7ed407a..f4506a1f92a 100644
--- a/gdb/testsuite/lib/gdb-utils.exp
+++ b/gdb/testsuite/lib/gdb-utils.exp
@@ -20,10 +20,10 @@
 
 proc gdb_init_commands {} {
     set commands ""
-    if [target_info exists gdb_init_command] {
+    if {[target_info exists gdb_init_command]} {
 	lappend commands [target_info gdb_init_command]
     }
-    if [target_info exists gdb_init_commands] {
+    if {[target_info exists gdb_init_commands]} {
 	set commands [concat $commands [target_info gdb_init_commands]]
     }
     return $commands
@@ -165,6 +165,7 @@ proc version_compare { l1 op l2 } {
 	if {$v1 == $v2} {
 	    continue
 	}
+	# tclint-disable-next-line unbraced-expr
 	return [expr $v1 $op $v2]
     }
 
-- 
2.47.3