diff options
Diffstat (limited to 'generic/tclTestObj.c')
| -rw-r--r-- | generic/tclTestObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index 70c75b6..682b41d 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -982,7 +982,7 @@ TestlistobjCmd( TCL_INDEX_NONE)); /* Keep looping since we are also looping for leaks */ } - Tcl_BumpObj(objP); + Tcl_BounceRefCount(objP); } break; @@ -1073,7 +1073,7 @@ static const Tcl_ObjType v1TestListType = { offsetof(Tcl_ObjType, indexProc), /* This is a V1 objType, which doesn't have an indexProc */ V1TestListObjLength, /* always return 100, doesn't really matter */ V1TestListObjIndex, /* should never be accessed, because this objType = V1*/ - NULL, NULL, NULL, NULL, NULL + NULL, NULL, NULL, NULL, NULL, NULL }; |