File indexing completed on 2026-04-12 08:27:01
0001
0002 #ifndef _TCLINT
0003 typedef void (ProcErrorProc)(Tcl_Interp *interp, Tcl_Obj *procNameObj);
0004 #endif
0005
0006 #ifndef TCL_OO_INTERNAL_H
0007 typedef int (TclOO_PreCallProc)(void *clientData, Tcl_Interp *interp,
0008 Tcl_ObjectContext context, Tcl_CallFrame *framePtr, int *isFinished);
0009 typedef int (TclOO_PostCallProc)(void *clientData, Tcl_Interp *interp,
0010 Tcl_ObjectContext context, Tcl_Namespace *namespacePtr, int result);
0011 #endif
0012
0013 MODULE_SCOPE int Itcl_NRRunCallbacks(Tcl_Interp *interp, void *rootPtr);
0014 MODULE_SCOPE void * Itcl_GetCurrentCallbackPtr(Tcl_Interp *interp);
0015 MODULE_SCOPE Tcl_Method Itcl_NewProcClassMethod(Tcl_Interp *interp, Tcl_Class clsPtr,
0016 TclOO_PreCallProc *preCallPtr, TclOO_PostCallProc *postCallPtr,
0017 ProcErrorProc *errProc, void *clientData, Tcl_Obj *nameObj,
0018 Tcl_Obj *argsObj, Tcl_Obj *bodyObj, void **clientData2);
0019 MODULE_SCOPE Tcl_Method Itcl_NewProcMethod(Tcl_Interp *interp, Tcl_Object oPtr,
0020 TclOO_PreCallProc *preCallPtr, TclOO_PostCallProc *postCallPtr,
0021 ProcErrorProc *errProc, void *clientData, Tcl_Obj *nameObj,
0022 Tcl_Obj *argsObj, Tcl_Obj *bodyObj, void **clientData2);
0023 MODULE_SCOPE int Itcl_PublicObjectCmd(void *clientData, Tcl_Interp *interp,
0024 Tcl_Class clsPtr, Tcl_Size objc, Tcl_Obj *const *objv);
0025 MODULE_SCOPE Tcl_Method Itcl_NewForwardClassMethod(Tcl_Interp *interp,
0026 Tcl_Class clsPtr, int flags, Tcl_Obj *nameObj, Tcl_Obj *prefixObj);
0027 MODULE_SCOPE int Itcl_SelfCmd(void *clientData, Tcl_Interp *interp,
0028 int objc, Tcl_Obj *const *objv);
0029 MODULE_SCOPE int Itcl_IsMethodCallFrame(Tcl_Interp *interp);
0030 MODULE_SCOPE int Itcl_InvokeEnsembleMethod(Tcl_Interp *interp, Tcl_Namespace *nsPtr,
0031 Tcl_Obj *namePtr, Tcl_Proc *procPtr, Tcl_Size objc, Tcl_Obj *const *objv);
0032 MODULE_SCOPE int Itcl_InvokeProcedureMethod(void *clientData, Tcl_Interp *interp,
0033 int objc, Tcl_Obj *const *objv);
