SHA256
1
0
forked from pool/tcl
tcl/itcl-unbreak-iwidgets.patch

21 lines
1.2 KiB
Diff

Index: generic/itclInt.h
==================================================================
--- generic/itclInt.h
+++ generic/itclInt.h
@@ -148,12 +148,12 @@
Tcl_HashTable nameClasses; /* maps from fullNamePtr to iclsPtr */
Tcl_HashTable namespaceClasses; /* maps from nsPtr to iclsPtr */
Tcl_HashTable procMethods; /* maps from procPtr to mFunc */
Tcl_HashTable instances; /* maps from instanceNumber to ioPtr */
Tcl_HashTable objectInstances; /* maps from ioPtr to instanceNumber */
- Tcl_HashTable unused; /* used to be myEnsembles. Dummy left in
- * for binary compatibility with itk */
+// Tcl_HashTable myEnsembles; /* maps from ensemble name (::itcl::find)
+// * etc. to ensemble pathName */
Tcl_HashTable classTypes; /* maps from class type i.e. "widget"
* to define value i.e. ITCL_WIDGET */
int protection; /* protection level currently in effect */
int useOldResolvers; /* whether to use the "old" style
* resolvers or the CallFrame resolvers */