diff options
author | mig <mig> | 2013-01-10 18:17:33 (GMT) |
---|---|---|
committer | mig <mig> | 2013-01-10 18:17:33 (GMT) |
commit | 41c09d7b4d37c2b2fc7cec61aaaa3ca59a56a7c5 (patch) | |
tree | fcdf1130a36b1327eae3194488030acd120e07b8 /generic/tclExecute.c | |
parent | b0d2108c0787bde409bec331a388113f6acb9450 (diff) | |
download | tcl-41c09d7b4d37c2b2fc7cec61aaaa3ca59a56a7c5.zip tcl-41c09d7b4d37c2b2fc7cec61aaaa3ca59a56a7c5.tar.gz tcl-41c09d7b4d37c2b2fc7cec61aaaa3ca59a56a7c5.tar.bz2 |
fix off-by-one error introduced in bd7d7a2061
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 8759ec9..ade71f6 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -1089,7 +1089,7 @@ GrowEvaluationStack( if (move) { moveWords = esPtr->tosPtr - MEMSTART(markerPtr) + 1; } - needed = growth + moveWords + WALLOCALIGN - 1; + needed = growth + moveWords + WALLOCALIGN; /* |