summaryrefslogtreecommitdiffstats
path: root/generic/tclLoad.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2012-11-29 17:25:59 (GMT)
committerdgp <dgp@users.sourceforge.net>2012-11-29 17:25:59 (GMT)
commit02e5732cffb9d23e1ea6612ee37c19a88e4891f2 (patch)
tree8535eb93a572ab5c35690209d53b8ea1ccc020c2 /generic/tclLoad.c
parent2e19edb3f50478006b2377ebbc196889331ef53c (diff)
downloadtcl-novem_review.zip
tcl-novem_review.tar.gz
tcl-novem_review.tar.bz2
Proposed rollback of the TCL_STUB_MAGIC change on novem branch.novem_review
Diffstat (limited to 'generic/tclLoad.c')
-rw-r--r--generic/tclLoad.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c
index 61c763f..6f5b9cf 100644
--- a/generic/tclLoad.c
+++ b/generic/tclLoad.c
@@ -474,9 +474,8 @@ Tcl_LoadObjCmd(
/* We have an Tcl 8.x extension with incompatible stub table. */
Tcl_Obj *obj = Tcl_NewStringObj(iPtr->result, -1);
Tcl_SetObjResult(interp, obj);
- } else {
- Tcl_TransferResult(target, code, interp);
}
+ Tcl_TransferResult(target, code, interp);
goto done;
}