diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2017-09-22 18:51:12 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2017-09-22 18:51:12 (GMT) |
commit | 3fa8e6dc88e8041b6cb88d1b1e9c05676d3346b7 (patch) | |
tree | 69afbb41089c8358615879f7cd3c4cf7997f4c7e /tcl8.6/generic/tclOOIntDecls.h | |
parent | a0e17db23c0fd7c771c0afce8cce350c98f90b02 (diff) | |
download | blt-3fa8e6dc88e8041b6cb88d1b1e9c05676d3346b7.zip blt-3fa8e6dc88e8041b6cb88d1b1e9c05676d3346b7.tar.gz blt-3fa8e6dc88e8041b6cb88d1b1e9c05676d3346b7.tar.bz2 |
update to tcl/tk 8.6.7
Diffstat (limited to 'tcl8.6/generic/tclOOIntDecls.h')
-rw-r--r-- | tcl8.6/generic/tclOOIntDecls.h | 166 |
1 files changed, 0 insertions, 166 deletions
diff --git a/tcl8.6/generic/tclOOIntDecls.h b/tcl8.6/generic/tclOOIntDecls.h deleted file mode 100644 index 74a8d81..0000000 --- a/tcl8.6/generic/tclOOIntDecls.h +++ /dev/null @@ -1,166 +0,0 @@ -/* - * This file is (mostly) automatically generated from tclOO.decls. - */ - -#ifndef _TCLOOINTDECLS -#define _TCLOOINTDECLS - -/* !BEGIN!: Do not edit below this line. */ - -#ifdef __cplusplus -extern "C" { -#endif - -/* - * Exported function declarations: - */ - -/* 0 */ -TCLAPI Tcl_Object TclOOGetDefineCmdContext(Tcl_Interp *interp); -/* 1 */ -TCLAPI Tcl_Method TclOOMakeProcInstanceMethod(Tcl_Interp *interp, - Object *oPtr, int flags, Tcl_Obj *nameObj, - Tcl_Obj *argsObj, Tcl_Obj *bodyObj, - const Tcl_MethodType *typePtr, - ClientData clientData, Proc **procPtrPtr); -/* 2 */ -TCLAPI Tcl_Method TclOOMakeProcMethod(Tcl_Interp *interp, - Class *clsPtr, int flags, Tcl_Obj *nameObj, - const char *namePtr, Tcl_Obj *argsObj, - Tcl_Obj *bodyObj, - const Tcl_MethodType *typePtr, - ClientData clientData, Proc **procPtrPtr); -/* 3 */ -TCLAPI Method * TclOONewProcInstanceMethod(Tcl_Interp *interp, - Object *oPtr, int flags, Tcl_Obj *nameObj, - Tcl_Obj *argsObj, Tcl_Obj *bodyObj, - ProcedureMethod **pmPtrPtr); -/* 4 */ -TCLAPI Method * TclOONewProcMethod(Tcl_Interp *interp, Class *clsPtr, - int flags, Tcl_Obj *nameObj, - Tcl_Obj *argsObj, Tcl_Obj *bodyObj, - ProcedureMethod **pmPtrPtr); -/* 5 */ -TCLAPI int TclOOObjectCmdCore(Object *oPtr, Tcl_Interp *interp, - int objc, Tcl_Obj *const *objv, - int publicOnly, Class *startCls); -/* 6 */ -TCLAPI int TclOOIsReachable(Class *targetPtr, Class *startPtr); -/* 7 */ -TCLAPI Method * TclOONewForwardMethod(Tcl_Interp *interp, - Class *clsPtr, int isPublic, - Tcl_Obj *nameObj, Tcl_Obj *prefixObj); -/* 8 */ -TCLAPI Method * TclOONewForwardInstanceMethod(Tcl_Interp *interp, - Object *oPtr, int isPublic, Tcl_Obj *nameObj, - Tcl_Obj *prefixObj); -/* 9 */ -TCLAPI Tcl_Method TclOONewProcInstanceMethodEx(Tcl_Interp *interp, - Tcl_Object oPtr, - TclOO_PreCallProc *preCallPtr, - TclOO_PostCallProc *postCallPtr, - ProcErrorProc *errProc, - ClientData clientData, Tcl_Obj *nameObj, - Tcl_Obj *argsObj, Tcl_Obj *bodyObj, - int flags, void **internalTokenPtr); -/* 10 */ -TCLAPI Tcl_Method TclOONewProcMethodEx(Tcl_Interp *interp, - Tcl_Class clsPtr, - TclOO_PreCallProc *preCallPtr, - TclOO_PostCallProc *postCallPtr, - ProcErrorProc *errProc, - ClientData clientData, Tcl_Obj *nameObj, - Tcl_Obj *argsObj, Tcl_Obj *bodyObj, - int flags, void **internalTokenPtr); -/* 11 */ -TCLAPI int TclOOInvokeObject(Tcl_Interp *interp, - Tcl_Object object, Tcl_Class startCls, - int publicPrivate, int objc, - Tcl_Obj *const *objv); -/* 12 */ -TCLAPI void TclOOObjectSetFilters(Object *oPtr, int numFilters, - Tcl_Obj *const *filters); -/* 13 */ -TCLAPI void TclOOClassSetFilters(Tcl_Interp *interp, - Class *classPtr, int numFilters, - Tcl_Obj *const *filters); -/* 14 */ -TCLAPI void TclOOObjectSetMixins(Object *oPtr, int numMixins, - Class *const *mixins); -/* 15 */ -TCLAPI void TclOOClassSetMixins(Tcl_Interp *interp, - Class *classPtr, int numMixins, - Class *const *mixins); - -typedef struct TclOOIntStubs { - int magic; - void *hooks; - - Tcl_Object (*tclOOGetDefineCmdContext) (Tcl_Interp *interp); /* 0 */ - Tcl_Method (*tclOOMakeProcInstanceMethod) (Tcl_Interp *interp, Object *oPtr, int flags, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj, const Tcl_MethodType *typePtr, ClientData clientData, Proc **procPtrPtr); /* 1 */ - Tcl_Method (*tclOOMakeProcMethod) (Tcl_Interp *interp, Class *clsPtr, int flags, Tcl_Obj *nameObj, const char *namePtr, Tcl_Obj *argsObj, Tcl_Obj *bodyObj, const Tcl_MethodType *typePtr, ClientData clientData, Proc **procPtrPtr); /* 2 */ - Method * (*tclOONewProcInstanceMethod) (Tcl_Interp *interp, Object *oPtr, int flags, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj, ProcedureMethod **pmPtrPtr); /* 3 */ - Method * (*tclOONewProcMethod) (Tcl_Interp *interp, Class *clsPtr, int flags, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj, ProcedureMethod **pmPtrPtr); /* 4 */ - int (*tclOOObjectCmdCore) (Object *oPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const *objv, int publicOnly, Class *startCls); /* 5 */ - int (*tclOOIsReachable) (Class *targetPtr, Class *startPtr); /* 6 */ - Method * (*tclOONewForwardMethod) (Tcl_Interp *interp, Class *clsPtr, int isPublic, Tcl_Obj *nameObj, Tcl_Obj *prefixObj); /* 7 */ - Method * (*tclOONewForwardInstanceMethod) (Tcl_Interp *interp, Object *oPtr, int isPublic, Tcl_Obj *nameObj, Tcl_Obj *prefixObj); /* 8 */ - Tcl_Method (*tclOONewProcInstanceMethodEx) (Tcl_Interp *interp, Tcl_Object oPtr, TclOO_PreCallProc *preCallPtr, TclOO_PostCallProc *postCallPtr, ProcErrorProc *errProc, ClientData clientData, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj, int flags, void **internalTokenPtr); /* 9 */ - Tcl_Method (*tclOONewProcMethodEx) (Tcl_Interp *interp, Tcl_Class clsPtr, TclOO_PreCallProc *preCallPtr, TclOO_PostCallProc *postCallPtr, ProcErrorProc *errProc, ClientData clientData, Tcl_Obj *nameObj, Tcl_Obj *argsObj, Tcl_Obj *bodyObj, int flags, void **internalTokenPtr); /* 10 */ - int (*tclOOInvokeObject) (Tcl_Interp *interp, Tcl_Object object, Tcl_Class startCls, int publicPrivate, int objc, Tcl_Obj *const *objv); /* 11 */ - void (*tclOOObjectSetFilters) (Object *oPtr, int numFilters, Tcl_Obj *const *filters); /* 12 */ - void (*tclOOClassSetFilters) (Tcl_Interp *interp, Class *classPtr, int numFilters, Tcl_Obj *const *filters); /* 13 */ - void (*tclOOObjectSetMixins) (Object *oPtr, int numMixins, Class *const *mixins); /* 14 */ - void (*tclOOClassSetMixins) (Tcl_Interp *interp, Class *classPtr, int numMixins, Class *const *mixins); /* 15 */ -} TclOOIntStubs; - -extern const TclOOIntStubs *tclOOIntStubsPtr; - -#ifdef __cplusplus -} -#endif - -#if defined(USE_TCLOO_STUBS) - -/* - * Inline function declarations: - */ - -#define TclOOGetDefineCmdContext \ - (tclOOIntStubsPtr->tclOOGetDefineCmdContext) /* 0 */ -#define TclOOMakeProcInstanceMethod \ - (tclOOIntStubsPtr->tclOOMakeProcInstanceMethod) /* 1 */ -#define TclOOMakeProcMethod \ - (tclOOIntStubsPtr->tclOOMakeProcMethod) /* 2 */ -#define TclOONewProcInstanceMethod \ - (tclOOIntStubsPtr->tclOONewProcInstanceMethod) /* 3 */ -#define TclOONewProcMethod \ - (tclOOIntStubsPtr->tclOONewProcMethod) /* 4 */ -#define TclOOObjectCmdCore \ - (tclOOIntStubsPtr->tclOOObjectCmdCore) /* 5 */ -#define TclOOIsReachable \ - (tclOOIntStubsPtr->tclOOIsReachable) /* 6 */ -#define TclOONewForwardMethod \ - (tclOOIntStubsPtr->tclOONewForwardMethod) /* 7 */ -#define TclOONewForwardInstanceMethod \ - (tclOOIntStubsPtr->tclOONewForwardInstanceMethod) /* 8 */ -#define TclOONewProcInstanceMethodEx \ - (tclOOIntStubsPtr->tclOONewProcInstanceMethodEx) /* 9 */ -#define TclOONewProcMethodEx \ - (tclOOIntStubsPtr->tclOONewProcMethodEx) /* 10 */ -#define TclOOInvokeObject \ - (tclOOIntStubsPtr->tclOOInvokeObject) /* 11 */ -#define TclOOObjectSetFilters \ - (tclOOIntStubsPtr->tclOOObjectSetFilters) /* 12 */ -#define TclOOClassSetFilters \ - (tclOOIntStubsPtr->tclOOClassSetFilters) /* 13 */ -#define TclOOObjectSetMixins \ - (tclOOIntStubsPtr->tclOOObjectSetMixins) /* 14 */ -#define TclOOClassSetMixins \ - (tclOOIntStubsPtr->tclOOClassSetMixins) /* 15 */ - -#endif /* defined(USE_TCLOO_STUBS) */ - -/* !END!: Do not edit above this line. */ - -#endif /* _TCLOOINTDECLS */ |