summaryrefslogtreecommitdiffstats
path: root/generic/tclLink.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-05-09 15:54:16 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-05-09 15:54:16 (GMT)
commit5a1aa160a161470edd5156772ad4b91126076fa4 (patch)
tree3ac198034dd3c822f1a803781c2b70c53aa4d156 /generic/tclLink.c
parent6d88a891b7b69da8bc86cf53f9f2fa9036e93d11 (diff)
parent67ba502f3489051889064fbb4b3b66741704d254 (diff)
downloadtcl-5a1aa160a161470edd5156772ad4b91126076fa4.zip
tcl-5a1aa160a161470edd5156772ad4b91126076fa4.tar.gz
tcl-5a1aa160a161470edd5156772ad4b91126076fa4.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclLink.c')
-rw-r--r--generic/tclLink.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/generic/tclLink.c b/generic/tclLink.c
index 590881d..1352b6f 100644
--- a/generic/tclLink.c
+++ b/generic/tclLink.c
@@ -392,8 +392,6 @@ Tcl_LinkArray(
if (code != TCL_OK) {
Tcl_DecrRefCount(linkPtr->varName);
LinkFree(linkPtr);
- } else {
- Tcl_SetObjResult(interp, Tcl_NewIntObj((int) linkPtr->addr));
}
return code;
}