summaryrefslogtreecommitdiffstats
path: root/generic/tclOOIntDecls.h
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclOOIntDecls.h')
-rw-r--r--generic/tclOOIntDecls.h98
1 files changed, 49 insertions, 49 deletions
diff --git a/generic/tclOOIntDecls.h b/generic/tclOOIntDecls.h
index 49aa7de..807c333 100644
--- a/generic/tclOOIntDecls.h
+++ b/generic/tclOOIntDecls.h
@@ -1,5 +1,5 @@
/*
- * $Id: tclOOIntDecls.h,v 1.9 2008/10/17 18:42:12 nijtmans Exp $
+ * $Id: tclOOIntDecls.h,v 1.10 2008/10/22 20:23:59 nijtmans Exp $
*
* This file is (mostly) automatically generated from tclOO.decls.
*/
@@ -38,128 +38,128 @@ EXTERN Tcl_Object TclOOGetDefineCmdContext (Tcl_Interp * interp);
#ifndef TclOOMakeProcInstanceMethod_TCL_DECLARED
#define TclOOMakeProcInstanceMethod_TCL_DECLARED
/* 1 */
-EXTERN Tcl_Method TclOOMakeProcInstanceMethod (Tcl_Interp * interp,
- Object * oPtr, int flags, Tcl_Obj * nameObj,
- Tcl_Obj * argsObj, Tcl_Obj * bodyObj,
- const Tcl_MethodType * typePtr,
+EXTERN 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);
#endif
#ifndef TclOOMakeProcMethod_TCL_DECLARED
#define TclOOMakeProcMethod_TCL_DECLARED
/* 2 */
-EXTERN 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,
+EXTERN 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);
#endif
#ifndef TclOONewProcInstanceMethod_TCL_DECLARED
#define TclOONewProcInstanceMethod_TCL_DECLARED
/* 3 */
-EXTERN Method * TclOONewProcInstanceMethod (Tcl_Interp * interp,
- Object * oPtr, int flags, Tcl_Obj * nameObj,
- Tcl_Obj * argsObj, Tcl_Obj * bodyObj,
+EXTERN Method * TclOONewProcInstanceMethod (Tcl_Interp * interp,
+ Object * oPtr, int flags, Tcl_Obj * nameObj,
+ Tcl_Obj * argsObj, Tcl_Obj * bodyObj,
ProcedureMethod ** pmPtrPtr);
#endif
#ifndef TclOONewProcMethod_TCL_DECLARED
#define TclOONewProcMethod_TCL_DECLARED
/* 4 */
-EXTERN Method * TclOONewProcMethod (Tcl_Interp * interp,
- Class * clsPtr, int flags, Tcl_Obj * nameObj,
- Tcl_Obj * argsObj, Tcl_Obj * bodyObj,
+EXTERN Method * TclOONewProcMethod (Tcl_Interp * interp,
+ Class * clsPtr, int flags, Tcl_Obj * nameObj,
+ Tcl_Obj * argsObj, Tcl_Obj * bodyObj,
ProcedureMethod ** pmPtrPtr);
#endif
#ifndef TclOOObjectCmdCore_TCL_DECLARED
#define TclOOObjectCmdCore_TCL_DECLARED
/* 5 */
-EXTERN int TclOOObjectCmdCore (Object * oPtr,
- Tcl_Interp * interp, int objc,
- Tcl_Obj *const * objv, int publicOnly,
+EXTERN int TclOOObjectCmdCore (Object * oPtr,
+ Tcl_Interp * interp, int objc,
+ Tcl_Obj *const * objv, int publicOnly,
Class * startCls);
#endif
#ifndef TclOOIsReachable_TCL_DECLARED
#define TclOOIsReachable_TCL_DECLARED
/* 6 */
-EXTERN int TclOOIsReachable (Class * targetPtr,
+EXTERN int TclOOIsReachable (Class * targetPtr,
Class * startPtr);
#endif
#ifndef TclOONewForwardMethod_TCL_DECLARED
#define TclOONewForwardMethod_TCL_DECLARED
/* 7 */
-EXTERN Method * TclOONewForwardMethod (Tcl_Interp * interp,
- Class * clsPtr, int isPublic,
+EXTERN Method * TclOONewForwardMethod (Tcl_Interp * interp,
+ Class * clsPtr, int isPublic,
Tcl_Obj * nameObj, Tcl_Obj * prefixObj);
#endif
#ifndef TclOONewForwardInstanceMethod_TCL_DECLARED
#define TclOONewForwardInstanceMethod_TCL_DECLARED
/* 8 */
-EXTERN Method * TclOONewForwardInstanceMethod (Tcl_Interp * interp,
- Object * oPtr, int isPublic,
+EXTERN Method * TclOONewForwardInstanceMethod (Tcl_Interp * interp,
+ Object * oPtr, int isPublic,
Tcl_Obj * nameObj, Tcl_Obj * prefixObj);
#endif
#ifndef TclOONewProcInstanceMethodEx_TCL_DECLARED
#define TclOONewProcInstanceMethodEx_TCL_DECLARED
/* 9 */
-EXTERN 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,
+EXTERN 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);
#endif
#ifndef TclOONewProcMethodEx_TCL_DECLARED
#define TclOONewProcMethodEx_TCL_DECLARED
/* 10 */
-EXTERN 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,
+EXTERN 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);
#endif
#ifndef TclOOInvokeObject_TCL_DECLARED
#define TclOOInvokeObject_TCL_DECLARED
/* 11 */
-EXTERN int TclOOInvokeObject (Tcl_Interp * interp,
- Tcl_Object object, Tcl_Class startCls,
- int publicPrivate, int objc,
+EXTERN int TclOOInvokeObject (Tcl_Interp * interp,
+ Tcl_Object object, Tcl_Class startCls,
+ int publicPrivate, int objc,
Tcl_Obj *const * objv);
#endif
#ifndef TclOOObjectSetFilters_TCL_DECLARED
#define TclOOObjectSetFilters_TCL_DECLARED
/* 12 */
-EXTERN void TclOOObjectSetFilters (Object * oPtr, int numFilters,
+EXTERN void TclOOObjectSetFilters (Object * oPtr, int numFilters,
Tcl_Obj *const * filters);
#endif
#ifndef TclOOClassSetFilters_TCL_DECLARED
#define TclOOClassSetFilters_TCL_DECLARED
/* 13 */
-EXTERN void TclOOClassSetFilters (Tcl_Interp * interp,
- Class * classPtr, int numFilters,
+EXTERN void TclOOClassSetFilters (Tcl_Interp * interp,
+ Class * classPtr, int numFilters,
Tcl_Obj *const * filters);
#endif
#ifndef TclOOObjectSetMixins_TCL_DECLARED
#define TclOOObjectSetMixins_TCL_DECLARED
/* 14 */
-EXTERN void TclOOObjectSetMixins (Object * oPtr, int numMixins,
+EXTERN void TclOOObjectSetMixins (Object * oPtr, int numMixins,
Class *const * mixins);
#endif
#ifndef TclOOClassSetMixins_TCL_DECLARED
#define TclOOClassSetMixins_TCL_DECLARED
/* 15 */
-EXTERN void TclOOClassSetMixins (Tcl_Interp * interp,
- Class * classPtr, int numMixins,
+EXTERN void TclOOClassSetMixins (Tcl_Interp * interp,
+ Class * classPtr, int numMixins,
Class *const * mixins);
#endif
typedef struct TclOOIntStubs {
int magic;
- CONST struct TclOOIntStubHooks *hooks;
+ const struct TclOOIntStubHooks *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 */
@@ -180,7 +180,7 @@ typedef struct TclOOIntStubs {
} TclOOIntStubs;
#if defined(USE_TCLOO_STUBS) && !defined(USE_TCLOO_STUB_PROCS)
-extern CONST TclOOIntStubs *tclOOIntStubsPtr;
+extern const TclOOIntStubs *tclOOIntStubsPtr;
#endif /* defined(USE_TCLOO_STUBS) && !defined(USE_TCLOO_STUB_PROCS) */
#if defined(USE_TCLOO_STUBS) && !defined(USE_TCLOO_STUB_PROCS)