Letting CONST die a slow and graceful death, since NO_CONST was

broken since 8.4 and no-one complained about it.

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)