[Bug testsuite/34553] [gdb/testsuite] Return in with_test_prefix doesn't return

https://sourceware.org/bugzilla/show_bug.cgi?id=34553

--- Comment #1 from Tom de Vries <vries at gcc dot gnu.org> ---
I'm currently testing a fix that does this everywhere in the testsuite:
...
-       return -code $code $result
+       return -options [dict incr opts -level] $result
...
and that seems to work for this problem as well:
...
$ cat test.tcl
#!/usr/bin/tclsh

proc with_test_prefix { body } {
    catch {uplevel 1 $body} result opts
    return -options [dict incr opts -level] $result
}

with_test_prefix {
  return
}

puts "HI"
$ ./test.tcl
$
...

-- 
You are receiving this mail because:
You are on the CC list for the bug.