summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordas <das>2008-08-14 10:49:08 (GMT)
committerdas <das>2008-08-14 10:49:08 (GMT)
commitca670c5a70a7fe17949373baed14393af713d227 (patch)
tree054a3dc2e13fb91a02f203c258a81eda66971eee
parent1dd5e8ff9790f2b3087139bc870d3c3b4477609b (diff)
downloadtcl-ca670c5a70a7fe17949373baed14393af713d227.zip
tcl-ca670c5a70a7fe17949373baed14393af713d227.tar.gz
tcl-ca670c5a70a7fe17949373baed14393af713d227.tar.bz2
fix unused variable warnings when USE_DTRACE is not defined
-rw-r--r--generic/tclCompile.h8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h
index f859e11..044a978 100644
--- a/generic/tclCompile.h
+++ b/generic/tclCompile.h
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclCompile.h,v 1.104 2008/08/14 02:16:36 das Exp $
+ * RCS: @(#) $Id: tclCompile.h,v 1.105 2008/08/14 10:49:08 das Exp $
*/
#ifndef _TCLCOMPILATION
@@ -1301,9 +1301,9 @@ MODULE_SCOPE void TclDTraceInfo(Tcl_Obj *info, char **args, int *argsi);
#define TCL_DTRACE_PROC_RESULT_ENABLED() 0
#define TCL_DTRACE_PROC_ARGS_ENABLED() 0
#define TCL_DTRACE_PROC_INFO_ENABLED() 0
-#define TCL_DTRACE_PROC_ENTRY(a0, a1, a2) {}
-#define TCL_DTRACE_PROC_RETURN(a0, a1) {}
-#define TCL_DTRACE_PROC_RESULT(a0, a1, a2, a3) {}
+#define TCL_DTRACE_PROC_ENTRY(a0, a1, a2) {if (a0) {}}
+#define TCL_DTRACE_PROC_RETURN(a0, a1) {if (a0) {}}
+#define TCL_DTRACE_PROC_RESULT(a0, a1, a2, a3) {if (a0) {}; if (a3) {}}
#define TCL_DTRACE_PROC_ARGS(a0, a1, a2, a3, a4, a5, a6, a7, a8, a9) {}
#define TCL_DTRACE_PROC_INFO(a0, a1, a2, a3, a4, a5, a6, a7) {}