Follow-up to earlier commit today:

Eliminate the need for an extra Stubs Pointer
for adressing a static stub table: Just change
the exported table from static to MODULE_SCOPE.

1 files changed, 6 insertions, 8 deletions

diff --git a/generic/tclOOStubInit.c b/generic/tclOOStubInit.c
index 3039aa2..0ed32b2 100644
--- a/generic/tclOOStubInit.c
+++ b/generic/tclOOStubInit.c
@@ -1,5 +1,5 @@
 /*
- * $Id: tclOOStubInit.c,v 1.8 2010/01/25 20:26:18 nijtmans Exp $
+ * $Id: tclOOStubInit.c,v 1.9 2010/02/05 20:53:12 nijtmans Exp $
  *
  * This file is (mostly) automatically generated from tclOO.decls.
  * It is compiled and linked in with the tclOO package proper.
@@ -10,9 +10,11 @@
 #endif
 #include "tclOOInt.h"
 
+MODULE_SCOPE const TclOOStubs tclOOConstStubs;
+
 /* !BEGIN!: Do not edit below this line. */
 
-static const TclOOIntStubs tclOOIntStubs = {
+static const TclOOIntStubs tclOOIntConstStubs = {
     TCL_STUB_MAGIC,
     NULL,
     TclOOGetDefineCmdContext, /* 0 */
@@ -34,10 +36,10 @@ static const TclOOIntStubs tclOOIntStubs = {
 };
 
 static const TclOOStubHooks tclOOStubHooks = {
-    &tclOOIntStubs
+    &tclOOIntConstStubs
 };
 
-static const TclOOStubs tclOOStubs = {
+const TclOOStubs tclOOConstStubs = {
     TCL_STUB_MAGIC,
     &tclOOStubHooks,
     Tcl_CopyObjectInstance, /* 0 */
@@ -72,7 +74,3 @@ static const TclOOStubs tclOOStubs = {
 };
 
 /* !END!: Do not edit above this line. */
-
-MODULE_SCOPE const TclOOStubs * const tclOOConstStubPtr;
-const TclOOStubs * const tclOOConstStubPtr = &tclOOStubs;
-