summaryrefslogtreecommitdiffstats
path: root/generic/tclTest.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r--generic/tclTest.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index 998416c..e3fe579 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -811,6 +811,7 @@ TestasyncCmd(dummy, interp, argc, argv)
asyncPtr->nextPtr = firstHandler;
firstHandler = asyncPtr;
TclFormatInt(buf, asyncPtr->id);
+ Tcl_MutexUnlock(&asyncTestMutex);
Tcl_SetResult(interp, buf, TCL_VOLATILE);
} else if (strcmp(argv[1], "delete") == 0) {
if (argc == 2) {