Differences From Artifact [5981accc3a]:

• File generic/tclTrace.c — part of check-in [a80fb8c697] at 2013-02-11 10:25:04 on branch novem — more Tcl_NewIntObj/Tcl_NewBooleanObj -> Tcl_NewLongObj conversions (user: jan.nijtmans size: 96537)

To Artifact [0a6e8fe942]:

• File generic/tclTrace.c — part of check-in [e216391d96] at 2013-02-19 13:21:53 on branch novem — Merge trunk. Tranform Tcl_SaveResult/Tcl_RestoreResult/Tcl_DiscardResult to macros, and remove them from the stub table (user: jan.nijtmans size: 96625) [more...]

1481
1482
1483
1484
1485
1486
1487

1488



1489
1490
1491
1492
1493
1494
1495

	}
	if (active.nextTracePtr) {
	    lastTracePtr = active.nextTracePtr->nextPtr;
	}
    }
    iPtr->activeCmdTracePtr = active.nextPtr;
    if (state) {

	Tcl_RestoreInterpState(interp, state);



    }

    return traceCode;
}

/*
 *----------------------------------------------------------------------

>
|
>
>
>

1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499

	}
	if (active.nextTracePtr) {
	    lastTracePtr = active.nextTracePtr->nextPtr;
	}
    }
    iPtr->activeCmdTracePtr = active.nextPtr;
    if (state) {
	if (traceCode == TCL_OK) {
	    (void) Tcl_RestoreInterpState(interp, state);
	} else {
	    Tcl_DiscardInterpState(state);
	}
    }

    return traceCode;
}

/*
 *----------------------------------------------------------------------