summaryrefslogtreecommitdiffstats
path: root/generic/tclZlib.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-01-24 11:53:34 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-01-24 11:53:34 (GMT)
commit8997eb06b951e71416f99c512ebed977f8cb61fb (patch)
tree2a8a720fea27602a18b4dc6201fa9bceb50e345d /generic/tclZlib.c
parent53ba10085a9de8ab30a7372eba6bfc937ff07dc5 (diff)
downloadtcl-8997eb06b951e71416f99c512ebed977f8cb61fb.zip
tcl-8997eb06b951e71416f99c512ebed977f8cb61fb.tar.gz
tcl-8997eb06b951e71416f99c512ebed977f8cb61fb.tar.bz2
Tcl Dicts > 2^31 elements too
Diffstat (limited to 'generic/tclZlib.c')
-rw-r--r--generic/tclZlib.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclZlib.c b/generic/tclZlib.c
index b874750..89ffc47 100644
--- a/generic/tclZlib.c
+++ b/generic/tclZlib.c
@@ -2492,7 +2492,7 @@ ZlibPushSubcmd(
switch ((enum pushOptionsEnum) option) {
case poHeader:
headerObj = objv[i];
- if (Tcl_DictObjSize(interp, headerObj, &dummy) != TCL_OK) {
+ if (TclDictObjSize_(interp, headerObj, &dummy) != TCL_OK) {
goto genericOptionError;
}
break;