Differences From Artifact [a316e0bea3]:

• File generic/tclProc.c — part of check-in [8944ae4374] at 2017-11-29 14:54:21 on branch tip-445 — merge 8.7 (user: dgp size: 80048) [more...]

To Artifact [431353b646]:

• File generic/tclProc.c — part of check-in [dd50956e9c] at 2017-12-19 16:22:24 on branch tip-445 — merge 8.7 (user: dgp size: 80048) [more...]

2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435

{
    Proc *procPtr;
    Tcl_Obj *nsObjPtr;

    LambdaGetIntRep(objPtr, procPtr, nsObjPtr);
    assert(procPtr != NULL);

    if (procPtr->refCount-- == 1) {
	TclProcCleanupProc(procPtr);
    }
    TclDecrRefCount(nsObjPtr);
}

static int
SetLambdaFromAny(

|

2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435

{
    Proc *procPtr;
    Tcl_Obj *nsObjPtr;

    LambdaGetIntRep(objPtr, procPtr, nsObjPtr);
    assert(procPtr != NULL);

    if (procPtr->refCount-- <= 1) {
	TclProcCleanupProc(procPtr);
    }
    TclDecrRefCount(nsObjPtr);
}

static int
SetLambdaFromAny(