From dcc8d48bc8b8bd5460c61afdd45f4d29023f41c4 Mon Sep 17 00:00:00 2001
From: das <das>
Date: Tue, 28 Mar 2006 10:52:38 +0000
Subject: 	* generic/tclIOUtil.c: fix to nativeFilesystemRecord
 comparisons 	(lesser part of [Bug 1064247])

---
 generic/tclIOUtil.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c
index 9709345..55e8b32 100644
--- a/generic/tclIOUtil.c
+++ b/generic/tclIOUtil.c
@@ -17,7 +17,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclIOUtil.c,v 1.77.2.28 2006/03/28 10:44:52 das Exp $
+ * RCS: @(#) $Id: tclIOUtil.c,v 1.77.2.29 2006/03/28 10:52:38 das Exp $
  */
 
 #include "tclInt.h"
@@ -748,7 +748,7 @@ TclFinalizeFilesystem()
 	FilesystemRecord *tmpFsRecPtr = fsRecPtr->nextPtr;
 	if (fsRecPtr->fileRefCount <= 0) {
 	    /* The native filesystem is static, so we don't free it */
-	    if (fsRecPtr != &nativeFilesystemRecord) {
+	    if (fsRecPtr->fsPtr != &tclNativeFilesystem) {
 		ckfree((char *)fsRecPtr);
 	    }
 	}
@@ -931,7 +931,7 @@ Tcl_FSUnregister(fsPtr)
      */
 
     fsRecPtr = filesystemList;
-    while ((retVal == TCL_ERROR) && (fsRecPtr != &nativeFilesystemRecord)) {
+    while ((retVal == TCL_ERROR) && (fsRecPtr->fsPtr != &tclNativeFilesystem)) {
 	if (fsRecPtr->fsPtr == fsPtr) {
 	    if (fsRecPtr->prevPtr) {
 		fsRecPtr->prevPtr->nextPtr = fsRecPtr->nextPtr;
@@ -1471,7 +1471,7 @@ TclFSNormalizeToUniquePath(interp, pathPtr, startAt, clientDataPtr)
 
     fsRecPtr = firstFsRecPtr;
     while (fsRecPtr != NULL) {
-        if (fsRecPtr == &nativeFilesystemRecord) {
+        if (fsRecPtr->fsPtr == &tclNativeFilesystem) {
 	    Tcl_FSNormalizePathProc *proc = fsRecPtr->fsPtr->normalizePathProc;
 	    if (proc != NULL) {
 		startAt = (*proc)(interp, pathPtr, startAt);
@@ -1484,7 +1484,7 @@ TclFSNormalizeToUniquePath(interp, pathPtr, startAt, clientDataPtr)
     fsRecPtr = firstFsRecPtr; 
     while (fsRecPtr != NULL) {
 	/* Skip the native system next time through */
-	if (fsRecPtr != &nativeFilesystemRecord) {
+	if (fsRecPtr->fsPtr != &tclNativeFilesystem) {
 	    Tcl_FSNormalizePathProc *proc = fsRecPtr->fsPtr->normalizePathProc;
 	    if (proc != NULL) {
 		startAt = (*proc)(interp, pathPtr, startAt);
@@ -3278,7 +3278,7 @@ FsListMounts(pathPtr, pattern)
 
     fsRecPtr = FsGetFirstFilesystem();
     while (fsRecPtr != NULL) {
-	if (fsRecPtr != &nativeFilesystemRecord) {
+	if (fsRecPtr->fsPtr != &tclNativeFilesystem) {
 	    Tcl_FSMatchInDirectoryProc *proc = 
 				  fsRecPtr->fsPtr->matchInDirectoryProc;
 	    if (proc != NULL) {
-- 
cgit v0.12