diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-08-22 20:34:30 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-08-22 20:34:30 (GMT) |
| commit | b3792d779d73852a163fd142bbb96acc46c98153 (patch) | |
| tree | f248c21ab92a2c21c2550b7a65bc458ac52823ac | |
| parent | f12764701b58ae91225b1ce8311378ef722b7a00 (diff) | |
| download | tcl-b3792d779d73852a163fd142bbb96acc46c98153.zip tcl-b3792d779d73852a163fd142bbb96acc46c98153.tar.gz tcl-b3792d779d73852a163fd142bbb96acc46c98153.tar.bz2 | |
compiler warning
| -rw-r--r-- | generic/tclBasic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 5371f31..fc449cc 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -4220,9 +4220,9 @@ Dispatch( ClientData clientData = data[1]; int objc = PTR2INT(data[2]); Tcl_Obj **objv = data[3]; +#ifdef USE_DTRACE Interp *iPtr = (Interp *) interp; -#ifdef USE_DTRACE if (TCL_DTRACE_CMD_ARGS_ENABLED()) { const char *a[10]; int i = 0; |