Hi!

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.

Tested on x86_64-linux, ok for trunk?

2026-03-25  Jakub Jelinek  <[email protected]>

        * lib/mike-gcc.exp (postbase): Use switch instead of case for
        TCL 9 compatibility.
        * lib/mike-g++.exp (postbase): Likewise.

--- gcc/testsuite/lib/mike-gcc.exp.jj   2026-01-02 09:56:10.370333086 +0100
+++ gcc/testsuite/lib/mike-gcc.exp      2026-03-25 08:57:46.758344300 +0100
@@ -105,7 +105,7 @@ proc postbase  { src_code run groups arg
 
     set compile_type "none"
 
-    case $actions {
+    switch $actions {
        compile
        {
            set compile_type "assembly"
--- gcc/testsuite/lib/mike-g++.exp.jj   2026-01-02 09:56:10.370333086 +0100
+++ gcc/testsuite/lib/mike-g++.exp      2026-03-25 08:57:54.176217515 +0100
@@ -101,7 +101,7 @@ proc postbase  { src_code run groups arg
 
     set compile_type "none"
 
-    case $actions {
+    switch $actions {
        compile
        {
            set compile_type "assembly"

        Jakub

Reply via email to