diff options
| -rw-r--r-- | ChangeLog | 10 | ||||
| -rw-r--r-- | generic/tclStubLib.c | 15 |
2 files changed, 14 insertions, 11 deletions
@@ -1,3 +1,13 @@ +2007-05-12 Joe English <jenglish@users.sourceforge.net> + + * generic/tclStubLib.c: Change Tcl_InitStubs(), tclStubsPtr, + and the auxilliary stubs table pointers back to public visibility. + + These symbols need to be exported so that stub-enabled extensions + may be statically linked into an extended tclsh or Big Wish with + a dynamically-linked libtcl. [Bug#1716117] + + 2007-05-15 Don Porter <dgp@users.sourceforge.net> * win/configure: autoconf-2.59 (FC6 fork) diff --git a/generic/tclStubLib.c b/generic/tclStubLib.c index 5e2d2ba..5389cfc 100644 --- a/generic/tclStubLib.c +++ b/generic/tclStubLib.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStubLib.c,v 1.14 2005/12/31 02:58:00 kennykb Exp $ + * RCS: @(#) $Id: tclStubLib.c,v 1.15 2007/05/16 18:28:40 jenglish Exp $ */ /* @@ -28,16 +28,9 @@ #include "tclInt.h" /* - * Ensure that Tcl_InitStubs is built as an exported symbol. The other stub - * symbols should be built as non-exported symbols. + * Tcl_InitStubs and stub table pointers are built as exported symbols. */ -MODULE_SCOPE TclStubs *tclStubsPtr; -MODULE_SCOPE TclPlatStubs *tclPlatStubsPtr; -MODULE_SCOPE TclIntStubs *tclIntStubsPtr; -MODULE_SCOPE TclIntPlatStubs *tclIntPlatStubsPtr; -MODULE_SCOPE TclTomMathStubs *tclTomMathStubsPtr; - TclStubs *tclStubsPtr = NULL; TclPlatStubs *tclPlatStubsPtr = NULL; TclIntStubs *tclIntStubsPtr = NULL; @@ -82,7 +75,7 @@ HasStubSupport( #undef Tcl_InitStubs #endif -MODULE_SCOPE CONST char * +CONST char * Tcl_InitStubs( Tcl_Interp *interp, CONST char *version, @@ -142,7 +135,7 @@ Tcl_InitStubs( #undef TclTomMathInitializeStubs #endif -MODULE_SCOPE CONST char* +CONST char* TclTomMathInitializeStubs( Tcl_Interp* interp, /* Tcl interpreter */ CONST char* version, /* Tcl version needed */ |