diff options
-rw-r--r-- | unix/tclUnixNotfy.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/unix/tclUnixNotfy.c b/unix/tclUnixNotfy.c index 2941331..219dd75 100644 --- a/unix/tclUnixNotfy.c +++ b/unix/tclUnixNotfy.c @@ -1358,8 +1358,8 @@ AtForkPrepare(void) static void AtForkParent(void) { - TclpMutexLock(); - TclpMasterLock(); + TclpMutexUnlock(); + TclpMasterUnlock(); Tcl_MutexUnlock(¬ifierMutex); } @@ -1382,8 +1382,8 @@ AtForkParent(void) static void AtForkChild(void) { - TclpMutexLock(); - TclpMasterLock(); + TclpMutexUnlock(); + TclpMasterUnlock(); Tcl_MutexUnlockAndFinalize(¬ifierMutex); Tcl_InitNotifier(); } |