The return of USE_DTRACE

p4raw-id: //depot/perl@33045

diff --git a/config_h.SH b/config_h.SH
index 5419d0c..16160e5 100644 (file)
--- a/config_h.SH
+++ b/config_h.SH
@@ -4440,6 +4440,12 @@ sed <<!GROK!THIS! >$CONFIG_H -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un
 #$use64bitall  USE_64_BIT_ALL          /**/
 #endif
 
+/* USE_DTRACE:
+ *     This symbol, if defined, indicates that Perl should
+ *     be built with support for DTrace.
+ */
+#$usedtrace USE_DTRACE         /**/
+
 /* USE_FAST_STDIO:
  *     This symbol, if defined, indicates that Perl should
  *     be built to use 'fast stdio'.

diff --git a/handy.h b/handy.h
index d891513..433fe13 100644 (file)
--- a/handy.h
+++ b/handy.h
@@ -177,7 +177,7 @@ typedef U64TYPE U64;
 #endif
 
 /* HMB H.Merijn Brand - a placeholder for preparing Configure patches */
-#if defined(HAS_MALLOC_SIZE) && defined(LOCALTIME_R_NEEDS_TZSET) && defined(HAS_PSEUDOFORK)
+#if defined(HAS_MALLOC_SIZE) && defined(LOCALTIME_R_NEEDS_TZSET) && defined(HAS_PSEUDOFORK) && defined(USE_DTRACE)
 /* Not (yet) used at top level, but mention them for metaconfig */
 #endif