diff options
author | dgp <dgp@users.sourceforge.net> | 2007-08-28 16:24:25 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2007-08-28 16:24:25 (GMT) |
commit | 7ea40c818db9bc2997da24992b2a40ef4a84d49a (patch) | |
tree | c8bea2a07ec8649d5d772a266ac94e7953061109 /generic/tclCompile.h | |
parent | d3ff1482b1385c013d986d55057ff030df30e4ac (diff) | |
download | tcl-7ea40c818db9bc2997da24992b2a40ef4a84d49a.zip tcl-7ea40c818db9bc2997da24992b2a40ef4a84d49a.tar.gz tcl-7ea40c818db9bc2997da24992b2a40ef4a84d49a.tar.bz2 |
* generic/tclBasic.c: Used unions to better clarify overloading of
* generic/tclCompExpr.c: the fields of the OpCmdInfo and
* generic/tclCompile.h: TclOpCmdClientData structs.
Diffstat (limited to 'generic/tclCompile.h')
-rw-r--r-- | generic/tclCompile.h | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 0dc8eef..ea975f9 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCompile.h,v 1.76 2007/08/27 19:56:51 dgp Exp $ + * RCS: @(#) $Id: tclCompile.h,v 1.77 2007/08/28 16:24:31 dgp Exp $ */ #ifndef _TCLCOMPILATION @@ -803,7 +803,10 @@ MODULE_SCOPE AuxDataType tclDictUpdateInfoType; typedef struct { const char *operator; const char *expected; - int numArgs; + union { + int numArgs; + int identity; + } i; } TclOpCmdClientData; /* |