X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/035b6821e6e17ee4ea286a7a8332b86222a67695..9548c15c693b04b09cb7a61d68f50a2008157c13:/feature.h

diff --git a/feature.h b/feature.h
index 60bf41d..b595cab 100644
--- a/feature.h
+++ b/feature.h
@@ -27,6 +27,13 @@
 /* The longest string we pass in.  */
 #define MAX_FEATURE_LEN (sizeof("evalbytes")-1)
 
+#define FEATURE_FC_IS_ENABLED \
+    ( \
+	CURRENT_FEATURE_BUNDLE == FEATURE_BUNDLE_515 \
+     || (CURRENT_FEATURE_BUNDLE == FEATURE_BUNDLE_CUSTOM && \
+	 FEATURE_IS_ENABLED("fc")) \
+    )
+
 #define FEATURE_SAY_IS_ENABLED \
     ( \
 	(CURRENT_FEATURE_BUNDLE >= FEATURE_BUNDLE_510 && \