Differences From Artifact [76192e755e]:

• File generic/tclLoad.c — part of check-in [8534448b44] at 2019-02-01 20:36:01 on branch trunk — Another (big) round of int -> size_t enhancements. So Tcl can handle string >2GiB in more places. (user: jan.nijtmans size: 34535) [more...]

To Artifact [6878ecac30]:

• File generic/tclLoad.c — part of check-in [b020429711] at 2020-01-17 18:37:40 on branch trunk — merge 8.7 (user: sebres size: 34539) [more...]

878
879
880
881
882
883
884
885

886
887
888
889
890
891
892

878
879
880
881
882
883
884

885
886
887
888
889
890
891
892

-
+

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

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