summaryrefslogtreecommitdiffstats
path: root/generic/tclResult.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclResult.c')
-rw-r--r--generic/tclResult.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tclResult.c b/generic/tclResult.c
index 3d39bc5..2336aad 100644
--- a/generic/tclResult.c
+++ b/generic/tclResult.c
@@ -853,7 +853,6 @@ SetupAppendBuffer(
Tcl_FreeResult((Tcl_Interp *) iPtr);
iPtr->result = iPtr->appendResult;
}
-#endif /* !TCL_NO_DEPRECATED */
/*
*----------------------------------------------------------------------
@@ -883,7 +882,6 @@ Tcl_FreeResult(
{
Interp *iPtr = (Interp *) interp;
-#ifndef TCL_NO_DEPRECATED
if (iPtr->freeProc != NULL) {
if (iPtr->freeProc == TCL_DYNAMIC) {
ckfree(iPtr->result);
@@ -893,10 +891,10 @@ Tcl_FreeResult(
iPtr->freeProc = 0;
}
-#endif /* !TCL_NO_DEPRECATED */
ResetObjResult(iPtr);
}
-
+#endif /* !TCL_NO_DEPRECATED */
+
/*
*----------------------------------------------------------------------
*