diff options
author | dgp <dgp@users.sourceforge.net> | 2012-11-29 17:25:59 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2012-11-29 17:25:59 (GMT) |
commit | 02e5732cffb9d23e1ea6612ee37c19a88e4891f2 (patch) | |
tree | 8535eb93a572ab5c35690209d53b8ea1ccc020c2 /generic/tclLoad.c | |
parent | 2e19edb3f50478006b2377ebbc196889331ef53c (diff) | |
download | tcl-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.c | 3 |
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; } |