Tcl Source Code: Artifact [bdfb66aac7]

Artifact bdfb66aac726cab51a639a002c73f907ee773047:

Attachment "patch_thread_ext_add_finalize.txt" to ticket [418689ffff] added by davygrvy 2001-04-25 07:18:12.

cvs diff threadCmd.c (in directory D:\thread_WS\thread\generic\)
Index: threadCmd.c
===================================================================
RCS file: /cvsroot/tcl/thread/generic/threadCmd.c,v
retrieving revision 1.20
diff -c -r1.20 threadCmd.c
*** threadCmd.c	2000/11/03 00:04:25	1.20
--- threadCmd.c	2001/04/25 00:13:30
***************
*** 965,970 ****
--- 965,971 ----
  
      ListRemove(tsdPtr);
      Tcl_DeleteInterp(tsdPtr->interp);
+     Tcl_FinalizeThread();
      Tcl_ExitThread(result);
  
      TCL_THREAD_CREATE_RETURN;