Skip to content

Commit de4730f

Browse files
committed
Add test for bug-f32864afe3
1 parent 2eb7ce5 commit de4730f

File tree

1 file changed

+5
-0
lines changed

1 file changed

+5
-0
lines changed

tests/thread.test

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1263,6 +1263,11 @@ test thread-22.1 {thread::send -command} {
12631263
set result
12641264
} hello
12651265

1266+
test thread-bug-f32864afe3 {Hang in thread::eval -lock} -body {
1267+
set mu [thread::mutex create]
1268+
thread::eval -lock $mu {}
1269+
thread::mutex destroy $mu ; # <- Bug f32864af hang
1270+
} -result {} -constraints bug-f32864afe3
12661271

12671272
removeFile dummyForTransfer
12681273
::tcltest::cleanupTests

0 commit comments

Comments
 (0)