Differences From Artifact [b60ae2fe67]:

• File generic/tclIOUtil.c — part of check-in [e339228320] at 2017-08-08 16:42:05 on branch core-8-6-branch — Cherrypick [527d354828] (user: andy size: 136387) [more...]

To Artifact [14c1a345a3]:

• File generic/tclIOUtil.c — part of check-in [cc89456f48] at 2017-11-13 10:51:39 on branch core-8-6-branch — No longer mark Tcl_EvalFile() as obsolete, since it will continue to be supported in Tcl 9.0 (user: jan.nijtmans size: 136372) [more...]

408
409
410
411
412
413
414
415
416
417
418
419
420
421
422

408
409
410
411
412
413
414

415
416
417
418
419
420
421

-

    }
    Tcl_DStringInit(cwdPtr);
    TclDStringAppendObj(cwdPtr, cwd);
    Tcl_DecrRefCount(cwd);
    return Tcl_DStringValue(cwdPtr);
}

/* Obsolete */
int
Tcl_EvalFile(
    Tcl_Interp *interp,		/* Interpreter in which to process file. */
    const char *fileName)	/* Name of file to process. Tilde-substitution
				 * will be performed on this name. */
{
    int ret;