Differences From Artifact [e8ad1fafe8]:

• File unix/tclUnixTest.c — part of check-in [72e64ef096] at 2018-12-12 19:38:33 on branch core-8-branch — If compiled with -DTCL_NO_DEPRECATED, remove Tcl_NewIntObj/Tcl_NewLongObj/Tcl_DbNewLongObj from stub table, as they will be gone in 9.0 (converted to a macro) Use Tcl_WideInt's directly in more places, diminishing the possibility of inadvent overflow. (user: jan.nijtmans size: 20499) [more...]

To Artifact [578f927fe2]:

• File unix/tclUnixTest.c — part of check-in [99d5f9c948] at 2019-07-04 06:54:24 on branch cplusplus — Experiment: compile Tcl with C++ compiler. WIP (user: jan.nijtmans size: 20507)

327
328
329
330
331
332
333
334
335
336
337
338
339
340
341

static void
TestFileHandlerProc(
    ClientData clientData,	/* Points to a Pipe structure. */
    int mask)			/* Indicates which events happened:
				 * TCL_READABLE or TCL_WRITABLE. */
{
    Pipe *pipePtr = clientData;

    if (mask & TCL_READABLE) {
	pipePtr->readCount++;
    }
    if (mask & TCL_WRITABLE) {
	pipePtr->writeCount++;
    }

|

327
328
329
330
331
332
333
334
335
336
337
338
339
340
341

static void
TestFileHandlerProc(
    ClientData clientData,	/* Points to a Pipe structure. */
    int mask)			/* Indicates which events happened:
				 * TCL_READABLE or TCL_WRITABLE. */
{
    Pipe *pipePtr = (Pipe *)clientData;

    if (mask & TCL_READABLE) {
	pipePtr->readCount++;
    }
    if (mask & TCL_WRITABLE) {
	pipePtr->writeCount++;
    }