From 496e51d46c8c6a0351bf4519629f1f94243f9d2e Mon Sep 17 00:00:00 2001 From: Tom de Vries Date: Sun, 5 Oct 2025 22:50:09 +0200 Subject: [PATCH] [gdb/testsuite, tclint] Fix lib/completion-support.exp --- gdb/tclint.toml | 1 - gdb/testsuite/lib/completion-support.exp | 2 +- 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/gdb/tclint.toml b/gdb/tclint.toml index 8807c1d2683..9e5fa7e7d83 100644 --- a/gdb/tclint.toml +++ b/gdb/tclint.toml @@ -37,7 +37,6 @@ exclude = [ "gdb/testsuite/lib/aarch64-scalable.exp", "gdb/testsuite/lib/cache.exp", "gdb/testsuite/lib/check-test-names.exp", -"gdb/testsuite/lib/completion-support.exp", "gdb/testsuite/lib/cp-support.exp", "gdb/testsuite/lib/debuginfod-support.exp", "gdb/testsuite/lib/d-support.exp", diff --git a/gdb/testsuite/lib/completion-support.exp b/gdb/testsuite/lib/completion-support.exp index 15f59e6b4b6..8ddf53d6243 100644 --- a/gdb/testsuite/lib/completion-support.exp +++ b/gdb/testsuite/lib/completion-support.exp @@ -400,7 +400,7 @@ proc index_after {needle haystack} { if {$start == -1} { error "could not find \"$needle\" in \"$haystack\"" } - return [expr $start + [string length $needle]] + return [expr {$start + [string length $needle]}] } # Create a breakpoint using BREAK_COMMAND, and return the number -- 2.47.3