diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-10-17 09:00:02 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-10-17 09:00:02 (GMT) |
commit | 4741ec5d8c5c8fc4c2c5895e6b8852f3f82aa5d0 (patch) | |
tree | d0542957eb5a41ed5c27ec02f086f9773a928068 /generic/tclStubInit.c | |
parent | 64a2d647eb9cb9a1c7aa46731e7323fb5407105a (diff) | |
parent | a31cc592a4e4c6d1ba5a4f0e12457adcfe668d15 (diff) | |
download | tcl-4741ec5d8c5c8fc4c2c5895e6b8852f3f82aa5d0.zip tcl-4741ec5d8c5c8fc4c2c5895e6b8852f3f82aa5d0.tar.gz tcl-4741ec5d8c5c8fc4c2c5895e6b8852f3f82aa5d0.tar.bz2 |
Eliminate TclOOInitializeStubs() completely. This fixes [dfc08326e3], at least the TclOOInitializeStubs() surprise part of it.
Further refactoring is possible, eliminating tclOOStubsPtr and/or tclOOIntStubsPtr. A discussion about that is opened on the Tcl Core List.
This is fully source compatible for TclOO extensions (e.g. Itcl, tdbc) but binary incompatible.
TODO: update documentation, but that can wait until the refactoring is complete.
Diffstat (limited to 'generic/tclStubInit.c')
-rwxr-xr-x[-rw-r--r--] | generic/tclStubInit.c | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 5fb501a..b430456 100644..100755 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -10,8 +10,16 @@ */ #include "tclInt.h" +#include "tclOOInt.h" #include "tommath.h" +/* + * The actual definition of the variable holding the TclOO stub table. + */ + +MODULE_SCOPE const TclOOStubs tclOOStubs; +MODULE_SCOPE const TclOOIntStubs tclOOIntStubs; + #ifdef __GNUC__ #pragma GCC dependency "tcl.decls" #pragma GCC dependency "tclInt.decls" @@ -694,7 +702,9 @@ const TclTomMathStubs tclTomMathStubs = { static const TclStubHooks tclStubHooks = { &tclPlatStubs, &tclIntStubs, - &tclIntPlatStubs + &tclIntPlatStubs, + &tclOOStubs, + &tclOOIntStubs }; const TclStubs tclStubs = { |