summaryrefslogtreecommitdiffstats
path: root/generic/tclProc.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-01-14 10:10:30 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-01-14 10:10:30 (GMT)
commitf1b74b07572c8ac168a3313a6c71ec30f1a7485c (patch)
treef0aed383ff3df3c53cde48d4c9d5717d0580289b /generic/tclProc.c
parent8a90d26eafca6f78203e2af6e227e6404041b851 (diff)
parenta9eaf6765198716158f4927d71f64d20182f1ad2 (diff)
downloadtcl-f1b74b07572c8ac168a3313a6c71ec30f1a7485c.zip
tcl-f1b74b07572c8ac168a3313a6c71ec30f1a7485c.tar.gz
tcl-f1b74b07572c8ac168a3313a6c71ec30f1a7485c.tar.bz2
Merge 8.6
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r--generic/tclProc.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c
index afe846e..72a3c2a 100644
--- a/generic/tclProc.c
+++ b/generic/tclProc.c
@@ -633,7 +633,7 @@ TclCreateProc(
*/
localPtr = (CompiledLocal *)ckalloc(
- offsetof(CompiledLocal, name) + fieldValues[0]->length + 1);
+ offsetof(CompiledLocal, name) + 1U + fieldValues[0]->length);
if (procPtr->firstLocalPtr == NULL) {
procPtr->firstLocalPtr = procPtr->lastLocalPtr = localPtr;
} else {