Differences From Artifact [83e85419a5]:

• File generic/tclIOSock.c — part of check-in [dd3e22aaf6] at 2022-10-13 10:31:22 on branch tip-468 — rebase to 8.7. Add documentation (user: jan.nijtmans size: 8305) [more...]

To Artifact [2f2dee3f88]:

• File generic/tclIOSock.c — part of check-in [41996582d5] at 2024-08-05 22:44:50 on branch core-8-branch — Missed some backports from 9.0. Some indenting (user: jan.nijtmans size: 8298) [more...]

245
246
247
248
249
250
251
252
253
254
255
256
257
258
259

    if (result != 0) {
	*errorMsgPtr =
#ifdef EAI_SYSTEM	/* Doesn't exist on Windows */
		(result == EAI_SYSTEM) ? Tcl_PosixError(interp) :
#endif /* EAI_SYSTEM */
		gai_strerror(result);
        return 0;
    }

    /*
     * Put IPv4 addresses before IPv6 addresses to maximize backwards
     * compatibility of [fconfigure -sockname] output.
     *
     * There might be more elegant/efficient ways to do this.

|

245
246
247
248
249
250
251
252
253
254
255
256
257
258
259

    if (result != 0) {
	*errorMsgPtr =
#ifdef EAI_SYSTEM	/* Doesn't exist on Windows */
		(result == EAI_SYSTEM) ? Tcl_PosixError(interp) :
#endif /* EAI_SYSTEM */
		gai_strerror(result);
	return 0;
    }

    /*
     * Put IPv4 addresses before IPv6 addresses to maximize backwards
     * compatibility of [fconfigure -sockname] output.
     *
     * There might be more elegant/efficient ways to do this.