diff options
| author | Miguel Sofer <miguel.sofer@gmail.com> | 2007-08-04 18:32:27 (GMT) |
|---|---|---|
| committer | Miguel Sofer <miguel.sofer@gmail.com> | 2007-08-04 18:32:27 (GMT) |
| commit | 5f27bf51933b916e9e5c01a9403a74ef83741b6a (patch) | |
| tree | 2d828b3d553ad34b9c79c634979526e3a7d04876 /generic/tclInt.decls | |
| parent | f234f8dce1ac71dd3a9aa6bfb4d1e48bb0c986ba (diff) | |
| download | tcl-5f27bf51933b916e9e5c01a9403a74ef83741b6a.zip tcl-5f27bf51933b916e9e5c01a9403a74ef83741b6a.tar.gz tcl-5f27bf51933b916e9e5c01a9403a74ef83741b6a.tar.bz2 | |
modifs to help itcl adapt to VarReform
Diffstat (limited to 'generic/tclInt.decls')
| -rw-r--r-- | generic/tclInt.decls | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index f2abb35..54256ea 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -12,7 +12,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tclInt.decls,v 1.111 2007/07/31 17:03:38 msofer Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.112 2007/08/04 18:32:27 msofer Exp $ library tcl @@ -928,6 +928,12 @@ declare 233 generic { void TclGetSrcInfoForPc(CmdFrame *contextPtr) } +# Exports for VarReform compat: Itcl likes to peek into our varTables :( +declare 234 generic { + Var *TclVarHashCreateVar(TclVarHashTable *tablePtr, const char *key, + int *newPtr) +} + ############################################################################## # Define the platform specific internal Tcl interface. These functions are |