summaryrefslogtreecommitdiffstats
path: root/generic/tclBasic.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-08-22 20:34:30 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-08-22 20:34:30 (GMT)
commitb3792d779d73852a163fd142bbb96acc46c98153 (patch)
treef248c21ab92a2c21c2550b7a65bc458ac52823ac /generic/tclBasic.c
parentf12764701b58ae91225b1ce8311378ef722b7a00 (diff)
downloadtcl-b3792d779d73852a163fd142bbb96acc46c98153.zip
tcl-b3792d779d73852a163fd142bbb96acc46c98153.tar.gz
tcl-b3792d779d73852a163fd142bbb96acc46c98153.tar.bz2
compiler warning
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r--generic/tclBasic.c2
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;