summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-02-19 10:53:29 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-02-19 10:53:29 (GMT)
commitf8e35a6396aefc1ffbb6a104b8cfd659e1afa2d9 (patch)
treeae16d1db14ac06ece400ace2ebf55e140f60650e
parent7ba8e6119017551866f531be022705ef17a1ed39 (diff)
downloadtcl-f8e35a6396aefc1ffbb6a104b8cfd659e1afa2d9.zip
tcl-f8e35a6396aefc1ffbb6a104b8cfd659e1afa2d9.tar.gz
tcl-f8e35a6396aefc1ffbb6a104b8cfd659e1afa2d9.tar.bz2
revert mangling with "code" variable. This caused unrelated var.test failures.
-rw-r--r--generic/tclTrace.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclTrace.c b/generic/tclTrace.c
index fd7566d..9298897 100644
--- a/generic/tclTrace.c
+++ b/generic/tclTrace.c
@@ -1482,7 +1482,7 @@ TclCheckExecutionTraces(
iPtr->activeCmdTracePtr = active.nextPtr;
if (state) {
if (traceCode == TCL_OK) {
- traceCode = Tcl_RestoreInterpState(interp, state);
+ (void) Tcl_RestoreInterpState(interp, state);
} else {
Tcl_DiscardInterpState(state);
}
@@ -1632,7 +1632,7 @@ TclCheckInterpTraces(
iPtr->activeInterpTracePtr = active.nextPtr;
if (state) {
if (traceCode == TCL_OK) {
- traceCode = Tcl_RestoreInterpState(interp, state);
+ (void) Tcl_RestoreInterpState(interp, state);
} else {
Tcl_DiscardInterpState(state);
}
@@ -2726,7 +2726,7 @@ TclCallVarTraces(
iPtr->flags &= ~(ERR_ALREADY_LOGGED);
Tcl_DiscardInterpState(state);
} else {
- code = Tcl_RestoreInterpState((Tcl_Interp *)iPtr, state);
+ (void) Tcl_RestoreInterpState((Tcl_Interp *)iPtr, state);
}
DisposeTraceResult(disposeFlags,result);
} else if (state) {