Differences From Artifact [4ca8f9d8a0]:

• File generic/tclLoad.c — part of check-in [5732a73bf5] at 2019-08-30 15:21:28 on branch cplusplus — Let's try a real C++ build with Travis on Linux (user: jan.nijtmans size: 34839) [more...]

To Artifact [e9ff50acf9]:

• File generic/tclLoad.c — part of check-in [c59e305ca6] at 2020-02-13 22:06:10 on branch cplusplus — Merge 8.7 (user: jan.nijtmans size: 34843) [more...]

882
883
884
885
886
887
888
889
890
891
892
893
894
895
896

		if (ipPtr->pkgPtr == defaultPtr) {
		    ipFirstPtr = ipFirstPtr->nextPtr;
		} else {
		    InterpPackage *ipPrevPtr;

		    for (ipPrevPtr = ipPtr; ipPtr != NULL;
			    ipPrevPtr = ipPtr, ipPtr = ipPtr->nextPtr) {
			if (ipPtr->pkgPtr == pkgPtr) {
			    ipPrevPtr->nextPtr = ipPtr->nextPtr;
			    break;
			}
		    }
		}
		Tcl_SetAssocData(target, "tclLoad", LoadCleanupProc,
			ipFirstPtr);

|

882
883
884
885
886
887
888
889
890
891
892
893
894
895
896

		if (ipPtr->pkgPtr == defaultPtr) {
		    ipFirstPtr = ipFirstPtr->nextPtr;
		} else {
		    InterpPackage *ipPrevPtr;

		    for (ipPrevPtr = ipPtr; ipPtr != NULL;
			    ipPrevPtr = ipPtr, ipPtr = ipPtr->nextPtr) {
			if (ipPtr->pkgPtr == defaultPtr) {
			    ipPrevPtr->nextPtr = ipPtr->nextPtr;
			    break;
			}
		    }
		}
		Tcl_SetAssocData(target, "tclLoad", LoadCleanupProc,
			ipFirstPtr);