diff options
author | sebres <sebres@users.sourceforge.net> | 2019-09-06 17:23:58 (GMT) |
---|---|---|
committer | sebres <sebres@users.sourceforge.net> | 2019-09-06 17:23:58 (GMT) |
commit | 5ed9c57d7a6452cb9bb3ae0c72953cbbf7b81c24 (patch) | |
tree | 5de52876a8870661841420dee1f758cd4132c5ac | |
parent | 5b7c6db87d8609f207993339675d523d4ac59d51 (diff) | |
download | tcl-5ed9c57d7a6452cb9bb3ae0c72953cbbf7b81c24.zip tcl-5ed9c57d7a6452cb9bb3ae0c72953cbbf7b81c24.tar.gz tcl-5ed9c57d7a6452cb9bb3ae0c72953cbbf7b81c24.tar.bz2 |
fix bad level (if specified argument is not a level at all)
-rw-r--r-- | generic/tclProc.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index d58e8da..f1e0148 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.c @@ -849,6 +849,7 @@ TclObjGetFrame( level = curLevel - 1; result = 0; + name = "1"; } /* |