Differences From Artifact [18860ad39e]:

• File unix/tclUnixFile.c — part of check-in [a0ed9240c8] at 2020-03-09 16:34:46 on branch trunk — merge 8.7 (user: dgp size: 30664) [more...]

To Artifact [eecfbd9c63]:

• File unix/tclUnixFile.c — part of check-in [bd5cc21d39] at 2020-04-14 14:30:35 on branch trunk — Merge 8.7 (user: jan.nijtmans size: 30665) [more...]

101
102
103
104
105
106
107
108

109
110
111
112
113
114
115

101
102
103
104
105
106
107

108
109
110
111
112
113
114
115

-
+

    /*
     * Search through all the directories named in the PATH variable to see if
     * argv[0] is in one of them. If so, use that file name.
     */

    while (1) {
	while (TclIsSpaceProc(*p)) {
	while (TclIsSpaceProcM(*p)) {
	    p++;
	}
	name = p;
	while ((*p != ':') && (*p != 0)) {
	    p++;
	}
	TclDStringClear(&buffer);