diff options
author | mig <mig> | 2013-12-06 14:29:49 (GMT) |
---|---|---|
committer | mig <mig> | 2013-12-06 14:29:49 (GMT) |
commit | 3cfba0cf67f0c2170e26cbff26e5dcc8bc64bf61 (patch) | |
tree | 11696c0833d09d26e3409c75934a97dd38d0d97c /generic | |
parent | 2b62a862dd4a4cfadaace89495663f3b90d49b69 (diff) | |
download | tcl-mig_opt_foreach.zip tcl-mig_opt_foreach.tar.gz tcl-mig_opt_foreach.tar.bz2 |
change NULL to INT2PTR(0), for claritymig_opt_foreach
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index b6d8841..a3083bc 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -6237,7 +6237,7 @@ TEBCresume( */ TclNewObj(tmpPtr); - tmpPtr->internalRep.twoPtrValue.ptr1 = NULL; + tmpPtr->internalRep.twoPtrValue.ptr1 = INT2PTR(0); tmpPtr->internalRep.twoPtrValue.ptr2 = INT2PTR(iterMax); PUSH_OBJECT(tmpPtr); /* iterCounts object */ |