diff options
Diffstat (limited to 'tools')
-rw-r--r-- | tools/genStubs.tcl | 4 |
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" |