diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-11-27 19:45:40 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-11-27 19:45:40 (GMT) |
| commit | 293016951704770ca48af42b926e4fada4e2054a (patch) | |
| tree | 732b6e136c6d06ecfb2704a289ff6219f8aef824 /generic/tclOOInt.h | |
| parent | d95ab0247a35a1a40f5e39186127a9f6ba4540a9 (diff) | |
| download | tcl-293016951704770ca48af42b926e4fada4e2054a.zip tcl-293016951704770ca48af42b926e4fada4e2054a.tar.gz tcl-293016951704770ca48af42b926e4fada4e2054a.tar.bz2 | |
Streamline TclOO object cleanup routines.
Diffstat (limited to 'generic/tclOOInt.h')
| -rw-r--r-- | generic/tclOOInt.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclOOInt.h b/generic/tclOOInt.h index 11ba698..83b4d58 100644 --- a/generic/tclOOInt.h +++ b/generic/tclOOInt.h @@ -495,6 +495,10 @@ MODULE_SCOPE int TclNRNewObjectInstance(Tcl_Interp *interp, const char *nsNameStr, int objc, Tcl_Obj *const *objv, int skip, Tcl_Object *objectPtr); +MODULE_SCOPE Object * TclNewObjectInstanceCommon(Tcl_Interp *interp, + Class *classPtr, + const char *nameStr, + const char *nsNameStr); MODULE_SCOPE int TclOODefineSlots(Foundation *fPtr); MODULE_SCOPE void TclOODeleteChain(CallChain *callPtr); MODULE_SCOPE void TclOODeleteChainCache(Tcl_HashTable *tablePtr); |