summaryrefslogtreecommitdiffstats
path: root/generic/tclProc.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-08-06 13:20:36 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-08-06 13:20:36 (GMT)
commit2fa3c7789bf50168600e5ba432c5bcb1ea3a5c81 (patch)
tree27620928337e684beb6dd84429d9582c3a5d0dbd /generic/tclProc.c
parent90aed79bb65a5df8dfc953a51ed832a8da563df4 (diff)
downloadtcl-2fa3c7789bf50168600e5ba432c5bcb1ea3a5c81.zip
tcl-2fa3c7789bf50168600e5ba432c5bcb1ea3a5c81.tar.gz
tcl-2fa3c7789bf50168600e5ba432c5bcb1ea3a5c81.tar.bz2
Eliminate the union that is no longer needed.
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r--generic/tclProc.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c
index 18985a1..1314719 100644
--- a/generic/tclProc.c
+++ b/generic/tclProc.c
@@ -271,8 +271,8 @@ Tcl_ProcObjCmd(
cfPtr->data.eval.path = contextPtr->data.eval.path;
Tcl_IncrRefCount(cfPtr->data.eval.path);
- cfPtr->cmd.str.cmd = NULL;
- cfPtr->cmd.str.len = 0;
+ cfPtr->cmd = NULL;
+ cfPtr->len = 0;
hePtr = Tcl_CreateHashEntry(iPtr->linePBodyPtr,
procPtr, &isNew);
@@ -2595,8 +2595,8 @@ SetLambdaFromAny(
cfPtr->data.eval.path = contextPtr->data.eval.path;
Tcl_IncrRefCount(cfPtr->data.eval.path);
- cfPtr->cmd.str.cmd = NULL;
- cfPtr->cmd.str.len = 0;
+ cfPtr->cmd = NULL;
+ cfPtr->len = 0;
}
/*