diff options
-rw-r--r-- | gdb/testsuite/lib/rocm.exp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/testsuite/lib/rocm.exp b/gdb/testsuite/lib/rocm.exp index 2276bb3..b2db0d5 100644 --- a/gdb/testsuite/lib/rocm.exp +++ b/gdb/testsuite/lib/rocm.exp @@ -112,7 +112,7 @@ set gpu_lock_filename gpu-parallel.lock # the GPU lock. proc with_rocm_gpu_lock { body } { - with_lock $::gpu_lock_filename $body + with_lock $::gpu_lock_filename {uplevel 1 $body} # In case BODY returned early due to some testcase failing, and # left GDB running, debugging the GPU. |