summaryrefslogtreecommitdiffstats
path: root/tools
diff options
context:
space:
mode:
authordas <das>2008-04-16 14:49:28 (GMT)
committerdas <das>2008-04-16 14:49:28 (GMT)
commitafd0f9b3f6990bb1d44b22b117df3fbb4a535a85 (patch)
tree9f4d763e4feec43980c4ccc9d7e151d0af7b0c91 /tools
parentf2cc98583dc54f92e54639280c862772682ad3ab (diff)
downloadtcl-afd0f9b3f6990bb1d44b22b117df3fbb4a535a85.zip
tcl-afd0f9b3f6990bb1d44b22b117df3fbb4a535a85.tar.gz
tcl-afd0f9b3f6990bb1d44b22b117df3fbb4a535a85.tar.bz2
* generic/tclInt.h: make stubs tables 'static const' and
* generic/tclStubInit.c: export only module-scope pointers to * generic/tclStubLib.c: the main stubs tables (for package * tools/genStubs.tcl: initialization). [Patch 1938497] * generic/tclBasic.c (Tcl_CreateInterp): * generic/tclTomMathInterface.c (TclTommath_Init):
Diffstat (limited to 'tools')
-rw-r--r--tools/genStubs.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/genStubs.tcl b/tools/genStubs.tcl
index ab5ebbc..ec70115 100644
--- a/tools/genStubs.tcl
+++ b/tools/genStubs.tcl
@@ -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: genStubs.tcl,v 1.25 2008/04/08 14:52:45 das Exp $
+# RCS: @(#) $Id: genStubs.tcl,v 1.26 2008/04/16 14:49:29 das Exp $
package require Tcl 8.4
@@ -1056,7 +1056,7 @@ proc genStubs::emitInit {name textVar} {
}
append text "\n\};\n"
}
- append text "\n${capName}Stubs ${name}Stubs = \{\n"
+ append text "\nstatic const ${capName}Stubs ${name}Stubs = \{\n"
append text " TCL_STUB_MAGIC,\n"
if {[info exists hooks($name)]} {
append text " &${name}StubHooks,\n"