diff options
| author | Joe Mistachkin <joe@mistachkin.com> | 2013-10-28 23:39:40 (GMT) |
|---|---|---|
| committer | Joe Mistachkin <joe@mistachkin.com> | 2013-10-28 23:39:40 (GMT) |
| commit | 6c8ec5a8fe406cf53341424e1529c9b0794b03ee (patch) | |
| tree | beb6424449783d7a9c84509ad47109c9e988e1fc /unix | |
| parent | 275aef21ecc230467a7849b792c43881b58557ff (diff) | |
| download | tcl-6c8ec5a8fe406cf53341424e1529c9b0794b03ee.zip tcl-6c8ec5a8fe406cf53341424e1529c9b0794b03ee.tar.gz tcl-6c8ec5a8fe406cf53341424e1529c9b0794b03ee.tar.bz2 | |
Add experimental new Tcl API Tcl_UnsetThreadData.
Diffstat (limited to 'unix')
| -rw-r--r-- | unix/tclUnixNotfy.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tclUnixNotfy.c b/unix/tclUnixNotfy.c index 69ef7f2..96b9636 100644 --- a/unix/tclUnixNotfy.c +++ b/unix/tclUnixNotfy.c @@ -1363,8 +1363,7 @@ AtForkChildProc(void) /* * Free all the thread specific data for the notifier now. Since the * child has no other threads, this data should be completely useless - * at this point. Unfortunately, there is currently no clean way to - * free the thread specific data structures themselves. + * at this point. */ for (tsdPtr = waitingListPtr; tsdPtr; tsdPtr = tsdPtr->nextPtr) { @@ -1402,6 +1401,7 @@ AtForkChildProc(void) * clean way to free it; however, it can no longer be used. */ + Tcl_UnsetThreadData(&dataKey, sizeof(ThreadSpecificData), 1 /*all */); dataKey = (Tcl_ThreadDataKey) 0; /* |