https://gcc.gnu.org/g:492ed6d0aec3ac8974e7ff41a4c0c37653ffa5cf
commit r14-12645-g492ed6d0aec3ac8974e7ff41a4c0c37653ffa5cf Author: Jakub Jelinek <[email protected]> Date: Thu Mar 26 18:11:06 2026 +0100 testsuite: Fix up another tcl 9 compatibility problem TCL 9 removed case command which has been deprecated before. https://core.tcl-lang.org/tcl/wiki?name=Migrating+scripts+to+Tcl+9 says "Replace case with switch" and switch has been working in TCL 8 just fine. 2026-03-26 Jakub Jelinek <[email protected]> * lib/mike-gcc.exp (postbase): Use switch instead of case for TCL 9 compatibility. * lib/mike-g++.exp (postbase): Likewise. (cherry picked from commit aa45de0c3173c6b85e079449d2f8f0eab9a38a7d) Diff: --- gcc/testsuite/lib/mike-g++.exp | 2 +- gcc/testsuite/lib/mike-gcc.exp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/gcc/testsuite/lib/mike-g++.exp b/gcc/testsuite/lib/mike-g++.exp index 06e9b6a4f957..19a6e3637a0d 100644 --- a/gcc/testsuite/lib/mike-g++.exp +++ b/gcc/testsuite/lib/mike-g++.exp @@ -101,7 +101,7 @@ proc postbase { src_code run groups args } { set compile_type "none" - case $actions { + switch $actions { compile { set compile_type "assembly" diff --git a/gcc/testsuite/lib/mike-gcc.exp b/gcc/testsuite/lib/mike-gcc.exp index 0cea8de63a15..cecb8f79d675 100644 --- a/gcc/testsuite/lib/mike-gcc.exp +++ b/gcc/testsuite/lib/mike-gcc.exp @@ -105,7 +105,7 @@ proc postbase { src_code run groups args } { set compile_type "none" - case $actions { + switch $actions { compile { set compile_type "assembly"
