summaryrefslogtreecommitdiffstats
path: root/generic/tclIOUtil.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2012-06-21 18:03:18 (GMT)
committerdgp <dgp@users.sourceforge.net>2012-06-21 18:03:18 (GMT)
commit607975b5dcc8af44e0fe65ab9ca787ed659e79bd (patch)
tree52a7c668f88718eca3b2687e1356330a1686c9f1 /generic/tclIOUtil.c
parent89dc338380acf9c6e134808e1575e8bf83743b91 (diff)
parent687013812cd6ca56d2bfc1c0b75d98a6f8a2d264 (diff)
downloadtcl-607975b5dcc8af44e0fe65ab9ca787ed659e79bd.zip
tcl-607975b5dcc8af44e0fe65ab9ca787ed659e79bd.tar.gz
tcl-607975b5dcc8af44e0fe65ab9ca787ed659e79bd.tar.bz2
Stop storing FilesystemRecord in the intrep of a "path". We never use it.
Store the Tcl_Filesystem instead, which is what we actually need.
Diffstat (limited to 'generic/tclIOUtil.c')
-rw-r--r--generic/tclIOUtil.c27
1 files changed, 1 insertions, 26 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c
index a4916b0..f466ca8 100644
--- a/generic/tclIOUtil.c
+++ b/generic/tclIOUtil.c
@@ -3948,31 +3948,6 @@ Tcl_FSSplitPath(
}
return result;
}
-
-/* Simple helper function. */
-Tcl_Obj *
-TclFSInternalToNormalized(
- const Tcl_Filesystem *fromFilesystem,
- ClientData clientData,
- FilesystemRecord **fsRecPtrPtr)
-{
- FilesystemRecord *fsRecPtr = FsGetFirstFilesystem();
-
- while (fsRecPtr != NULL) {
- if (fsRecPtr->fsPtr == fromFilesystem) {
- *fsRecPtrPtr = fsRecPtr;
- break;
- }
- fsRecPtr = fsRecPtr->nextPtr;
- }
-
- if ((fsRecPtr == NULL)
- || (fromFilesystem->internalToNormalizedProc == NULL)) {
- return NULL;
- }
- return fromFilesystem->internalToNormalizedProc(clientData);
-}
-
/*
*----------------------------------------------------------------------
*
@@ -4563,7 +4538,7 @@ Tcl_FSGetFileSystemForPath(
* call to the pathInFilesystemProc.
*/
- TclFSSetPathDetails(pathPtr, fsRecPtr, clientData);
+ TclFSSetPathDetails(pathPtr, fsRecPtr->fsPtr, clientData);
return fsRecPtr->fsPtr;
}
}