summaryrefslogtreecommitdiffstats
path: root/generic/tclClock.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-05-17 16:27:19 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-05-17 16:27:19 (GMT)
commit59f20f23bdf80b9aa0106269a64e16715a0deb2c (patch)
tree1c09e78560216f9c0d9d708bca172ef4dd93cc6b /generic/tclClock.c
parentc0d3b18e36ba15b38e066951ddf5adaf995be0d0 (diff)
parent292c03d1c289ed9aae8eac6aba53c1857e4bf90d (diff)
downloadtcl-59f20f23bdf80b9aa0106269a64e16715a0deb2c.zip
tcl-59f20f23bdf80b9aa0106269a64e16715a0deb2c.tar.gz
tcl-59f20f23bdf80b9aa0106269a64e16715a0deb2c.tar.bz2
Merge 9.0
Diffstat (limited to 'generic/tclClock.c')
-rw-r--r--generic/tclClock.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclClock.c b/generic/tclClock.c
index 620a9d2..31265f0 100644
--- a/generic/tclClock.c
+++ b/generic/tclClock.c
@@ -754,7 +754,7 @@ ConvertLocalToUTC(
* Unpack the tz data.
*/
- if (TclListObjGetElements(interp, tzdata, &rowc, &rowv) != TCL_OK) {
+ if (TclListObjGetElementsM(interp, tzdata, &rowc, &rowv) != TCL_OK) {
return TCL_ERROR;
}
@@ -819,7 +819,7 @@ ConvertLocalToUTCUsingTable(
while (!found) {
row = LookupLastTransition(interp, fields->seconds, rowc, rowv);
if ((row == NULL)
- || TclListObjGetElements(interp, row, &cellc,
+ || TclListObjGetElementsM(interp, row, &cellc,
&cellv) != TCL_OK
|| TclGetIntFromObj(interp, cellv[1],
&fields->tzOffset) != TCL_OK) {
@@ -957,7 +957,7 @@ ConvertUTCToLocal(
* Unpack the tz data.
*/
- if (TclListObjGetElements(interp, tzdata, &rowc, &rowv) != TCL_OK) {
+ if (TclListObjGetElementsM(interp, tzdata, &rowc, &rowv) != TCL_OK) {
return TCL_ERROR;
}
@@ -1009,7 +1009,7 @@ ConvertUTCToLocalUsingTable(
row = LookupLastTransition(interp, fields->seconds, rowc, rowv);
if (row == NULL ||
- TclListObjGetElements(interp, row, &cellc, &cellv) != TCL_OK ||
+ TclListObjGetElementsM(interp, row, &cellc, &cellv) != TCL_OK ||
TclGetIntFromObj(interp, cellv[1], &fields->tzOffset) != TCL_OK) {
return TCL_ERROR;
}