aboutsummaryrefslogtreecommitdiff
path: root/jim-namespace.c
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2011-12-11 07:45:23 +1000
committerSteve Bennett <steveb@workware.net.au>2011-12-12 13:44:43 +1000
commit7cff4d617b4d89c73a49d5b57f851c2a74145b03 (patch)
tree067c3044586b73776bd76a44dd9fec10d156de4e /jim-namespace.c
parenta10d4bae942ac9e56ebc210f76f29b99dc1839e8 (diff)
downloadjimtcl-7cff4d617b4d89c73a49d5b57f851c2a74145b03.zip
jimtcl-7cff4d617b4d89c73a49d5b57f851c2a74145b03.tar.gz
jimtcl-7cff4d617b4d89c73a49d5b57f851c2a74145b03.tar.bz2
Add support for [apply]
apply has the advantage of not disturbing the proc epoch for short lived commands Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jim-namespace.c')
-rw-r--r--jim-namespace.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/jim-namespace.c b/jim-namespace.c
index 9b606c7..3413705 100644
--- a/jim-namespace.c
+++ b/jim-namespace.c
@@ -96,11 +96,13 @@ int Jim_CreateNamespaceVariable(Jim_Interp *interp, Jim_Obj *varNameObj, Jim_Obj
{
int rc;
Jim_IncrRefCount(varNameObj);
+ Jim_IncrRefCount(targetNameObj);
/* push non-namespace vars if in namespace eval? */
rc = Jim_SetVariableLink(interp, varNameObj, targetNameObj, interp->topFramePtr);
Jim_DecrRefCount(interp, varNameObj);
+ Jim_DecrRefCount(interp, targetNameObj);
return rc;
}