diff options
author | dgp <dgp@noemail.net> | 2011-07-12 16:05:43 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2011-07-12 16:05:43 (GMT) |
commit | 964cf407742c9599df5a346ce23b50beac10aeb5 (patch) | |
tree | f6c583ac1ec4985f3cd1d3eac93ce909c3f86436 /generic/tclExecute.c | |
parent | ac40d750761f70590b71f0032ecadb58547025f3 (diff) | |
download | tcl-964cf407742c9599df5a346ce23b50beac10aeb5.zip tcl-964cf407742c9599df5a346ce23b50beac10aeb5.tar.gz tcl-964cf407742c9599df5a346ce23b50beac10aeb5.tar.bz2 |
platform portable type matching in debug prints
FossilOrigin-Name: 83d26b2944ce1ac96c7dd15dfb459114a3234fa5
Diffstat (limited to 'generic/tclExecute.c')
-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 fee096a..a7d6184 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -8441,7 +8441,7 @@ EvalStatsCmd( Tcl_AppendPrintfToObj(objPtr, "\n----------------------------------------------------------------\n"); Tcl_AppendPrintfToObj(objPtr, "Compilation and execution statistics for interpreter %#lx\n", - iPtr); + (long int)iPtr); Tcl_AppendPrintfToObj(objPtr, "\nNumber ByteCodes executed\t%ld\n", statsPtr->numExecutions); |