diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-16 06:25:19 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-16 06:25:19 (GMT) |
commit | 17c92b0a7ac5d920c36a88947ec2e713980e03ba (patch) | |
tree | e6e40198955ae69fa623e16993fa0140add9c2a7 /generic/tclInt.h | |
parent | 50dde26caf2055ef3a7d925be870a923f20d1afd (diff) | |
parent | 4eb91b8e5b59d6af6a2d612f6767f2f62d0cddd2 (diff) | |
download | tcl-17c92b0a7ac5d920c36a88947ec2e713980e03ba.zip tcl-17c92b0a7ac5d920c36a88947ec2e713980e03ba.tar.gz tcl-17c92b0a7ac5d920c36a88947ec2e713980e03ba.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 46ce7c0..979284d 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2504,7 +2504,7 @@ typedef struct ListStore { typedef struct ListSpan { Tcl_Size spanStart; /* Starting index of the span */ Tcl_Size spanLength; /* Number of elements in the span */ - Tcl_Size refCount; /* Count of references to this span record */ + size_t refCount; /* Count of references to this span record */ } ListSpan; #ifndef LIST_SPAN_THRESHOLD /* May be set on build line */ #define LIST_SPAN_THRESHOLD 101 @@ -3244,8 +3244,6 @@ MODULE_SCOPE Tcl_Obj * TclLindexList(Tcl_Interp *interp, Tcl_Obj *listPtr, Tcl_Obj *argPtr); MODULE_SCOPE Tcl_Obj * TclLindexFlat(Tcl_Interp *interp, Tcl_Obj *listPtr, Tcl_Size indexCount, Tcl_Obj *const indexArray[]); - - MODULE_SCOPE Tcl_Obj * TclListObjGetElement(Tcl_Obj *listObj, Tcl_Size index); /* TIP #280 */ MODULE_SCOPE void TclListLines(Tcl_Obj *listObj, Tcl_Size line, int n, @@ -4475,9 +4473,6 @@ MODULE_SCOPE void TclDbInitNewObj(Tcl_Obj *objPtr, const char *file, # define TclDecrRefCount(objPtr) \ Tcl_DbDecrRefCount(objPtr, __FILE__, __LINE__) -# define TclNewListObjDirect(objc, objv) \ - TclDbNewListObjDirect(objc, objv, __FILE__, __LINE__) - #undef USE_THREAD_ALLOC #endif /* TCL_MEM_DEBUG */ |