summaryrefslogtreecommitdiffstats
path: root/generic/tclCompile.h
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2007-08-28 16:24:25 (GMT)
committerdgp <dgp@users.sourceforge.net>2007-08-28 16:24:25 (GMT)
commit7ea40c818db9bc2997da24992b2a40ef4a84d49a (patch)
treec8bea2a07ec8649d5d772a266ac94e7953061109 /generic/tclCompile.h
parentd3ff1482b1385c013d986d55057ff030df30e4ac (diff)
downloadtcl-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.h7
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;
/*