Differences From Artifact [96248900b4]:

• File generic/tclIOUtil.c — part of check-in [48cea1251a] at 2023-10-09 20:46:01 on branch main — Merge 8.7 (user: jan.nijtmans size: 123859) [more...]

To Artifact [1734aac5e7]:

• File generic/tclIOUtil.c — part of check-in [f67f60d202] at 2023-10-19 18:48:35 on branch main — Merge 8.7 (user: jan.nijtmans size: 123867) [more...]

2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062

    Tcl_Interp *interp)		/* Interpreter to set the errorCode of */
{
    const char *id, *msg;

    msg = Tcl_ErrnoMsg(errno);
    id = Tcl_ErrnoId();
    if (interp) {
	Tcl_SetErrorCode(interp, "POSIX", id, msg, NULL);
    }
    return msg;
}

/*
 *----------------------------------------------------------------------
 *

|

2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062

    Tcl_Interp *interp)		/* Interpreter to set the errorCode of */
{
    const char *id, *msg;

    msg = Tcl_ErrnoMsg(errno);
    id = Tcl_ErrnoId();
    if (interp) {
	Tcl_SetErrorCode(interp, "POSIX", id, msg, (void *)NULL);
    }
    return msg;
}

/*
 *----------------------------------------------------------------------
 *