diff options
author | patthoyts <patthoyts@users.sourceforge.net> | 2008-11-07 20:10:18 (GMT) |
---|---|---|
committer | patthoyts <patthoyts@users.sourceforge.net> | 2008-11-07 20:10:18 (GMT) |
commit | fce9e95f9fcaf90587b556ee2de2ba36a2d81f42 (patch) | |
tree | 2614d7c5156407b785325c3d4db346285472bd68 /generic/tclInt.h | |
parent | e2049a58b3ae85b4fdd0e585a75194984bbf6232 (diff) | |
download | tcl-fce9e95f9fcaf90587b556ee2de2ba36a2d81f42.zip tcl-fce9e95f9fcaf90587b556ee2de2ba36a2d81f42.tar.gz tcl-fce9e95f9fcaf90587b556ee2de2ba36a2d81f42.tar.bz2 |
patch #2215022: clean up the binary ensemble initialization code
Applied a patch from Duoas which extends the TclMakeEnsemble command to
handle sub-ensembles from tables. Cleaned up the original patch a bit.
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 551688d..f0c922f 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -15,7 +15,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.h,v 1.404 2008/10/15 06:17:03 nijtmans Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.405 2008/11/07 20:10:19 patthoyts Exp $ */ #ifndef _TCLINT @@ -1455,10 +1455,11 @@ typedef struct ByteCodeStats { */ typedef struct { - const char *name; /* The name of the subcommand. */ - Tcl_ObjCmdProc *proc; /* The implementation of the subcommand. */ - CompileProc *compileProc; /* The compiler for the subcommand. */ - Tcl_ObjCmdProc *nreProc; /* NRE implementation of this command */ + const char *name; /* The name of the subcommand */ + Tcl_ObjCmdProc *proc; /* The implementation of the subcommand */ + CompileProc *compileProc; /* The compiler for the subcommand */ + Tcl_ObjCmdProc *nreProc; /* NRE implementation of this command */ + ClientData clientData; /* Any clientData to give the command */ } EnsembleImplMap; /* |