diff options
author | dgp <dgp@users.sourceforge.net> | 2019-04-08 13:49:35 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2019-04-08 13:49:35 (GMT) |
commit | 1bef1aacd263871ee465a0ff0b95eef90f0de7c5 (patch) | |
tree | 40667954f41456d235d4b75ac3fbf974bb294f16 /generic/tclRegexp.c | |
parent | a475e0b1ee3d2716a524c722064a7e3e404d3e38 (diff) | |
parent | c1de90d70a6cac71dc4200eb9d9fb2b08a8f9b1c (diff) | |
download | tcl-1bef1aacd263871ee465a0ff0b95eef90f0de7c5.zip tcl-1bef1aacd263871ee465a0ff0b95eef90f0de7c5.tar.gz tcl-1bef1aacd263871ee465a0ff0b95eef90f0de7c5.tar.bz2 |
merge 8.7
Diffstat (limited to 'generic/tclRegexp.c')
-rw-r--r-- | generic/tclRegexp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclRegexp.c b/generic/tclRegexp.c index ce53ced..804b117 100644 --- a/generic/tclRegexp.c +++ b/generic/tclRegexp.c @@ -998,7 +998,7 @@ CompileRegexp( tsdPtr->regexps[i+1] = tsdPtr->regexps[i]; } tsdPtr->patterns[0] = ckalloc(length + 1); - memcpy(tsdPtr->patterns[0], string, (unsigned) length + 1); + memcpy(tsdPtr->patterns[0], string, length + 1); tsdPtr->patLengths[0] = length; tsdPtr->regexps[0] = regexpPtr; |