Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | merge 8.6 |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | core-8-branch |
| Files: | files | file ages | folders |
| SHA3-256: |
23c46c8cd1be6fb9ae7c250033eda04c |
| User & Date: | dgp 2018-03-11 21:29:10.074 |
Context
|
2018-03-12
| ||
| 13:38 | Implement TIP 462: Add New [::tcl::process] Ensemble for Subprocess Management check-in: 2409228234 user: dgp tags: core-8-branch | |
| 13:24 | merge 8.7 Closed-Leaf check-in: 7ff3e810a4 user: dgp tags: tip-462 | |
|
2018-03-11
| ||
| 23:08 | merge 8.7 check-in: ba6c45d940 user: dgp tags: core_zip_vfs | |
| 23:08 | merge 8.7 Leaf check-in: de798b5604 user: dgp tags: sebres-string-insert-cr1 | |
| 22:42 | merge 8.7 check-in: 49512ebf1d user: dgp tags: tip-445 | |
| 22:35 | merge 8.7 check-in: d2bbe92e24 user: dgp tags: bug-e593adf103-core-8 | |
| 22:34 | merge 8.7 check-in: c5126a3728 user: dgp tags: tip-421 | |
| 21:42 | merge 8.7 check-in: 3108218eee user: dgp tags: trunk | |
| 21:29 | merge 8.6 check-in: 23c46c8cd1 user: dgp tags: core-8-branch | |
| 21:15 | plug memleaks check-in: b087783022 user: dgp tags: core-8-6-branch | |
| 12:22 | merge 8.6 check-in: f27bd866ac user: dgp tags: core-8-branch | |
Changes
Changes to generic/tclOO.c.
| ︙ | ︙ | |||
628 629 630 631 632 633 634 635 636 637 638 639 640 641 |
ClientData clientData, /* Pointer to the OO system foundation
* structure. */
Tcl_Interp *interp) /* The interpreter containing the OO system
* foundation. */
{
Foundation *fPtr = GetFoundation(interp);
TclDecrRefCount(fPtr->unknownMethodNameObj);
TclDecrRefCount(fPtr->constructorName);
TclDecrRefCount(fPtr->destructorName);
TclDecrRefCount(fPtr->clonedName);
TclDecrRefCount(fPtr->defineName);
ckfree(fPtr);
}
| > > > > > > > > > | 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 |
ClientData clientData, /* Pointer to the OO system foundation
* structure. */
Tcl_Interp *interp) /* The interpreter containing the OO system
* foundation. */
{
Foundation *fPtr = GetFoundation(interp);
/*
* Crude mechanism to avoid leaking the Object struct of the
* foundation components oo::object and oo::class
*
* Should probably be replaced with something more elegantly designed.
*/
while (TclOODecrRefCount(fPtr->objectCls->thisPtr) == 0) {};
while (TclOODecrRefCount(fPtr->classCls->thisPtr) == 0) {};
TclDecrRefCount(fPtr->unknownMethodNameObj);
TclDecrRefCount(fPtr->constructorName);
TclDecrRefCount(fPtr->destructorName);
TclDecrRefCount(fPtr->clonedName);
TclDecrRefCount(fPtr->defineName);
ckfree(fPtr);
}
|
| ︙ | ︙ | |||
1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 |
if (clsPtr->filters.num) {
Tcl_Obj *filterObj;
FOREACH(filterObj, clsPtr->filters) {
TclDecrRefCount(filterObj);
}
ckfree(clsPtr->filters.list);
clsPtr->filters.num = 0;
}
/*
* Squelch our metadata.
*/
if (clsPtr->metadataPtr != NULL) {
Tcl_ObjectMetadataType *metadataTypePtr;
| > > > > > > > > > > > > > > > > | 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 |
if (clsPtr->filters.num) {
Tcl_Obj *filterObj;
FOREACH(filterObj, clsPtr->filters) {
TclDecrRefCount(filterObj);
}
ckfree(clsPtr->filters.list);
clsPtr->filters.list = NULL;
clsPtr->filters.num = 0;
}
/*
* Squelch our instances.
*/
if (clsPtr->instances.num) {
Object *oPtr;
FOREACH(oPtr, clsPtr->instances) {
TclOODecrRefCount(oPtr);
}
ckfree(clsPtr->instances.list);
clsPtr->instances.list = NULL;
clsPtr->instances.num = 0;
}
/*
* Squelch our metadata.
*/
if (clsPtr->metadataPtr != NULL) {
Tcl_ObjectMetadataType *metadataTypePtr;
|
| ︙ | ︙ |