diff options
| author | griffin <briang42@easystreet.net> | 2023-08-11 17:55:27 (GMT) |
|---|---|---|
| committer | griffin <briang42@easystreet.net> | 2023-08-11 17:55:27 (GMT) |
| commit | 0a0ba9e30933d273a7c6b265c177b72f5cdf7e9b (patch) | |
| tree | 93a15ac40ad5d0142c74ffa8aa288637c7a8649a /generic/tclArithSeries.c | |
| parent | 073b0f729a1f7389698607f8560a3a52fc049968 (diff) | |
| download | tcl-0a0ba9e30933d273a7c6b265c177b72f5cdf7e9b.zip tcl-0a0ba9e30933d273a7c6b265c177b72f5cdf7e9b.tar.gz tcl-0a0ba9e30933d273a7c6b265c177b72f5cdf7e9b.tar.bz2 | |
Replace DuplicateObj with ListObjCopy where appropriate.
Diffstat (limited to 'generic/tclArithSeries.c')
| -rwxr-xr-x | generic/tclArithSeries.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclArithSeries.c b/generic/tclArithSeries.c index a074a43..f26d83b 100755 --- a/generic/tclArithSeries.c +++ b/generic/tclArithSeries.c @@ -1151,7 +1151,7 @@ ArithSeriesInOperation( if (status != TCL_OK) { test = 0; } else { - char const *vstr = Tcl_GetStringFromObj(valueObj, &vlen); + const char *vstr = Tcl_GetStringFromObj(valueObj, &vlen); index = (y - dblRepPtr->start) / dblRepPtr->step; while (incr<2) { Tcl_Obj *elemObj; |