aboutsummaryrefslogtreecommitdiff
path: root/jim.c
diff options
context:
space:
mode:
Diffstat (limited to 'jim.c')
-rw-r--r--jim.c8
1 files changed, 8 insertions, 0 deletions
diff --git a/jim.c b/jim.c
index ebc3dae..a204328 100644
--- a/jim.c
+++ b/jim.c
@@ -4066,6 +4066,14 @@ int Jim_SetVariableLink(Jim_Interp *interp, Jim_Obj *nameObjPtr,
}
Jim_IncrRefCount(targetNameObjPtr);
+ if (framePtr->level < targetCallFrame->level) {
+ Jim_SetResultFormatted(interp,
+ "bad variable name \"%#s\": upvar won't create namespace variable that refers to procedure variable",
+ nameObjPtr);
+ Jim_DecrRefCount(interp, targetNameObjPtr);
+ return JIM_ERR;
+ }
+
/* Check for cycles. */
if (framePtr == targetCallFrame) {
Jim_Obj *objPtr = targetNameObjPtr;