diff options
| author | mdejong <mdejong> | 2004-11-22 22:48:24 (GMT) |
|---|---|---|
| committer | mdejong <mdejong> | 2004-11-22 22:48:24 (GMT) |
| commit | fe96f0fa28a0a74e364c71258018723dccbe1e92 (patch) | |
| tree | 77a89b040355d776bdb439eb5a181f16e5d1254e /unix/tclUnixThrd.c | |
| parent | 410ca739ad19b27a082a84b39c18a042307a549f (diff) | |
| download | tcl-fe96f0fa28a0a74e364c71258018723dccbe1e92.zip tcl-fe96f0fa28a0a74e364c71258018723dccbe1e92.tar.gz tcl-fe96f0fa28a0a74e364c71258018723dccbe1e92.tar.bz2 | |
* 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]
Diffstat (limited to 'unix/tclUnixThrd.c')
| -rw-r--r-- | unix/tclUnixThrd.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/unix/tclUnixThrd.c b/unix/tclUnixThrd.c index 00059df..ee080ba 100644 --- a/unix/tclUnixThrd.c +++ b/unix/tclUnixThrd.c @@ -835,8 +835,12 @@ TclpReaddir(DIR * dir) 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; } |