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 | 272b2008ad7da7b6bd2c559142d78d06f0030a67 (patch) | |
| tree | f248c21ab92a2c21c2550b7a65bc458ac52823ac /generic/tclBasic.c | |
| parent | f7cf1b2bae1b15e6c6002405dbff659d2e8ac384 (diff) | |
| download | tcl-272b2008ad7da7b6bd2c559142d78d06f0030a67.zip tcl-272b2008ad7da7b6bd2c559142d78d06f0030a67.tar.gz tcl-272b2008ad7da7b6bd2c559142d78d06f0030a67.tar.bz2 | |
compiler warning
Diffstat (limited to 'generic/tclBasic.c')
| -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; |