Differences From Artifact [0ac0ef166c]:

• File win/tclWinSock.c — part of check-in [2ba1cd687f] at 2020-04-30 15:35:25 on branch core-8-6-branch — Win: use physical host DNS name instead cluster name. Ticket [da235271f1] (user: oehhar size: 87830) [more...]

To Artifact [442558041d]:

• File win/tclWinSock.c — part of check-in [013b828787] at 2020-08-11 05:39:08 on branch core-8-6-branch — Eliminate many unnecessary type-casts, mostly (size_t) when value is already size_t or int (user: jan.nijtmans size: 87822) [more...]

374
375
376
377
378
379
380
381
382
383
384
385
386
387
388

	    Tcl_DStringFree(&inDs);
	}
    }

    *encodingPtr = Tcl_GetEncoding(NULL, "utf-8");
    *lengthPtr = Tcl_DStringLength(&ds);
    *valuePtr = ckalloc((*lengthPtr) + 1);
    memcpy(*valuePtr, Tcl_DStringValue(&ds), (size_t)(*lengthPtr)+1);
    Tcl_DStringFree(&ds);
}

/*
 *----------------------------------------------------------------------
 *
 * Tcl_GetHostName --

|

374
375
376
377
378
379
380
381
382
383
384
385
386
387
388

	    Tcl_DStringFree(&inDs);
	}
    }

    *encodingPtr = Tcl_GetEncoding(NULL, "utf-8");
    *lengthPtr = Tcl_DStringLength(&ds);
    *valuePtr = ckalloc((*lengthPtr) + 1);
    memcpy(*valuePtr, Tcl_DStringValue(&ds), *lengthPtr + 1);
    Tcl_DStringFree(&ds);
}

/*
 *----------------------------------------------------------------------
 *
 * Tcl_GetHostName --