Differences From Artifact [da26937cb8]:

• File unix/tclUnixThrd.c — part of check-in [942144282c] at 2004-08-10 19:40:48 on branch trunk — Changed handling of the returned thread ID since broken on 64-bit systems (Cray). Thanks to Rob Ratcliff for reporting the bug. (user: vasiljevic size: 23757) [more...]

To Artifact [c36bb07c3f]:

• File unix/tclUnixThrd.c — part of check-in [de53d33e5e] at 2004-11-22 22:40:31 on branch trunk — * unix/configure: Regen. * unix/tcl.m4 (SC_ENABLE_THREADS): Check for a 2 argument version of readdir_r that is known to exists under IRIX 5.3. * unix/tclUnixThrd.c (TclpReaddir): Use either 2 arg or 3 arg version of readdir_r. [Bug 1001325] (user: mdejong size: 23903) [more...]

879
880
881
882
883
884
885
886




887

888
889
890
891
892
893
894

879
880
881
882
883
884
885

886
887
888
889
890
891
892
893
894
895
896
897
898

-
+
+
+
+

+

TclpReaddir(DIR * dir)
{
    Tcl_DirEntry *ent;
#ifdef TCL_THREADS
    ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey);

#ifdef HAVE_READDIR_R
    ent = &tsdPtr->rdbuf.ent; 
    ent = &tsdPtr->rdbuf.ent;
# ifdef HAVE_TWO_ARG_READDIR_R
    if (TclOSreaddir_r(dir, ent) != 0) {
# else /* HAVE_THREE_ARG_READDIR_R */
    if (TclOSreaddir_r(dir, ent, &ent) != 0) {
# endif /* HAVE_TWO_ARG_READDIR_R */
	ent = NULL;
    }

#else /* !HAVE_READDIR_R */

    Tcl_MutexLock(&rdMutex);
#   ifdef HAVE_STRUCT_DIRENT64