diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-01-14 10:10:30 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-01-14 10:10:30 (GMT) |
| commit | f1b74b07572c8ac168a3313a6c71ec30f1a7485c (patch) | |
| tree | f0aed383ff3df3c53cde48d4c9d5717d0580289b /generic/tclProc.c | |
| parent | 8a90d26eafca6f78203e2af6e227e6404041b851 (diff) | |
| parent | a9eaf6765198716158f4927d71f64d20182f1ad2 (diff) | |
| download | tcl-f1b74b07572c8ac168a3313a6c71ec30f1a7485c.zip tcl-f1b74b07572c8ac168a3313a6c71ec30f1a7485c.tar.gz tcl-f1b74b07572c8ac168a3313a6c71ec30f1a7485c.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclProc.c')
| -rw-r--r-- | generic/tclProc.c | 2 |
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 { |
