summaryrefslogtreecommitdiffstats
path: root/generic/tclOOStubInit.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclOOStubInit.c')
-rw-r--r--generic/tclOOStubInit.c54
1 files changed, 27 insertions, 27 deletions
diff --git a/generic/tclOOStubInit.c b/generic/tclOOStubInit.c
index 7c7a3cc..522fa6b 100644
--- a/generic/tclOOStubInit.c
+++ b/generic/tclOOStubInit.c
@@ -1,5 +1,5 @@
/*
- * $Id: tclOOStubInit.c,v 1.2 2008/05/31 23:35:27 das Exp $
+ * $Id: tclOOStubInit.c,v 1.3 2008/06/01 00:33:05 dkf Exp $
*
* This file is (mostly) automatically generated from tclOO.decls.
* It is compiled and linked in with the tclOO package proper.
@@ -13,11 +13,34 @@
/* !BEGIN!: Do not edit below this line. */
+static const TclOOIntStubs tclOOIntStubs = {
+ TCL_STUB_MAGIC,
+ NULL,
+ TclOOGetDefineCmdContext, /* 0 */
+ TclOOMakeProcInstanceMethod, /* 1 */
+ TclOOMakeProcMethod, /* 2 */
+ TclOONewProcInstanceMethod, /* 3 */
+ TclOONewProcMethod, /* 4 */
+ TclOOObjectCmdCore, /* 5 */
+ TclOOIsReachable, /* 6 */
+ TclOONewForwardMethod, /* 7 */
+ TclOONewForwardInstanceMethod, /* 8 */
+ TclOONewProcInstanceMethodEx, /* 9 */
+ TclOONewProcMethodEx, /* 10 */
+ TclOOInvokeObject, /* 11 */
+ TclOOObjectSetFilters, /* 12 */
+ TclOOClassSetFilters, /* 13 */
+ TclOOObjectSetMixins, /* 14 */
+ TclOOClassSetMixins, /* 15 */
+};
+
+static const TclOOStubHooks tclOOStubHooks = {
+ &tclOOIntStubs
+};
+
static const TclOOStubs tclOOStubs = {
TCL_STUB_MAGIC,
- TCLOO_STUBS_EPOCH,
- TCLOO_STUBS_REVISION,
- 0,
+ &tclOOStubHooks,
Tcl_CopyObjectInstance, /* 0 */
Tcl_GetClassAsObject, /* 1 */
Tcl_GetObjectAsClass, /* 2 */
@@ -48,29 +71,6 @@ static const TclOOStubs tclOOStubs = {
Tcl_ClassSetDestructor, /* 27 */
};
-static const TclOOIntStubs tclOOIntStubs = {
- TCL_STUB_MAGIC,
- TCLOOINT_STUBS_EPOCH,
- TCLOOINT_STUBS_REVISION,
- 0,
- TclOOGetDefineCmdContext, /* 0 */
- TclOOMakeProcInstanceMethod, /* 1 */
- TclOOMakeProcMethod, /* 2 */
- TclOONewProcInstanceMethod, /* 3 */
- TclOONewProcMethod, /* 4 */
- TclOOObjectCmdCore, /* 5 */
- TclOOIsReachable, /* 6 */
- TclOONewForwardMethod, /* 7 */
- TclOONewForwardInstanceMethod, /* 8 */
- TclOONewProcInstanceMethodEx, /* 9 */
- TclOONewProcMethodEx, /* 10 */
- TclOOInvokeObject, /* 11 */
- TclOOObjectSetFilters, /* 12 */
- TclOOClassSetFilters, /* 13 */
- TclOOObjectSetMixins, /* 14 */
- TclOOClassSetMixins, /* 15 */
-};
-
/* !END!: Do not edit above this line. */
static const struct TclOOStubAPI tclOOStubAPI = {