diff options
| author | sebres <sebres@users.sourceforge.net> | 2018-05-29 17:58:53 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2018-05-29 17:58:53 (GMT) |
| commit | 83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93 (patch) | |
| tree | 24752b41caa67f4f7176f5482c1921f3c6943eab /unix/tclUnixFile.c | |
| parent | 153e32d613b99001ad5c711314c0702372d1d273 (diff) | |
| parent | a2ce3dab9b2939f21c06358081d0977ec937e106 (diff) | |
| download | tcl-83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93.zip tcl-83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93.tar.gz tcl-83a8197fe9d38bd55cb7ee1d5dfd4ea2b8415c93.tar.bz2 | |
back-porting of tclclockmod done, merge current 8.6
Diffstat (limited to 'unix/tclUnixFile.c')
| -rw-r--r-- | unix/tclUnixFile.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tclUnixFile.c b/unix/tclUnixFile.c index 7ffbf8d..5684b16 100644 --- a/unix/tclUnixFile.c +++ b/unix/tclUnixFile.c @@ -259,7 +259,7 @@ TclpMatchInDirectory( Tcl_DecrRefCount(tailPtr); Tcl_DecrRefCount(fileNamePtr); } else { - DIR *d; + TclDIR *d; Tcl_DirEntry *entryPtr; const char *dirName; int dirLength, nativeDirLen; @@ -309,7 +309,7 @@ TclpMatchInDirectory( return TCL_OK; } - d = opendir(native); /* INTL: Native. */ + d = TclOSopendir(native); /* INTL: Native. */ if (d == NULL) { Tcl_DStringFree(&ds); if (interp != NULL) { @@ -387,7 +387,7 @@ TclpMatchInDirectory( } } - closedir(d); + TclOSclosedir(d); Tcl_DStringFree(&ds); Tcl_DStringFree(&dsOrig); Tcl_DecrRefCount(fileNamePtr); |
