diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-01-24 20:54:34 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-01-24 20:54:34 (GMT) |
commit | 6bdd87140b59bb9442e2e281da2c1c65bfaccd37 (patch) | |
tree | fa51bc676868b1afd638f3d236204ef929913451 /generic/tclObj.c | |
parent | 875e3b392ba9b930fa009077b451b08f15b4ea72 (diff) | |
parent | af3e9b9825f98a98907966cdd71286c1f00c8bcf (diff) | |
download | tcl-6bdd87140b59bb9442e2e281da2c1c65bfaccd37.zip tcl-6bdd87140b59bb9442e2e281da2c1c65bfaccd37.tar.gz tcl-6bdd87140b59bb9442e2e281da2c1c65bfaccd37.tar.bz2 |
More work in progress
Diffstat (limited to 'generic/tclObj.c')
-rw-r--r-- | generic/tclObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c index d32f9be..8f95260 100644 --- a/generic/tclObj.c +++ b/generic/tclObj.c @@ -835,13 +835,13 @@ Tcl_AppendAllObjTypes( { Tcl_HashEntry *hPtr; Tcl_HashSearch search; - int numElems; + size_t numElems; /* * Get the test for a valid list out of the way first. */ - if (TclListObjLength_(interp, objPtr, &numElems) != TCL_OK) { + if (Tcl_ListObjLength(interp, objPtr, &numElems) != TCL_OK) { return TCL_ERROR; } |