Add lvalue_refs feature feature
authorFather Chrysostomos <sprout@cpan.org>
Sat, 20 Sep 2014 18:12:37 +0000 (11:12 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 11 Oct 2014 04:53:47 +0000 (21:53 -0700)
feature.h
lib/feature.pm
regen/feature.pl

index 698302c..c6c71e3 100644 (file)
--- a/feature.h
+++ b/feature.h
         FEATURE_IS_ENABLED("__SUB__")) \
     )
 
+#define FEATURE_LVREF_IS_ENABLED \
+    ( \
+       CURRENT_FEATURE_BUNDLE == FEATURE_BUNDLE_CUSTOM && \
+        FEATURE_IS_ENABLED("lvref") \
+    )
+
 #define FEATURE_LEXSUBS_IS_ENABLED \
     ( \
        CURRENT_FEATURE_BUNDLE == FEATURE_BUNDLE_CUSTOM && \
index 89765c6..aabedd8 100644 (file)
@@ -17,6 +17,7 @@ our %feature = (
     array_base      => 'feature_arybase',
     signatures      => 'feature_signatures',
     current_sub     => 'feature___SUB__',
+    lvalue_refs     => 'feature_lvref',
     lexical_subs    => 'feature_lexsubs',
     postderef_qq    => 'feature_postderef_qq',
     unicode_eval    => 'feature_unieval',
@@ -27,7 +28,7 @@ our %feature_bundle = (
     "5.10"    => [qw(array_base say state switch)],
     "5.11"    => [qw(array_base say state switch unicode_strings)],
     "5.15"    => [qw(current_sub evalbytes fc say state switch unicode_eval unicode_strings)],
-    "all"     => [qw(array_base current_sub evalbytes fc lexical_subs postderef postderef_qq say signatures state switch unicode_eval unicode_strings)],
+    "all"     => [qw(array_base current_sub evalbytes fc lexical_subs lvalue_refs postderef postderef_qq say signatures state switch unicode_eval unicode_strings)],
     "default" => [qw(array_base)],
 );
 
index c9a4cd6..62f5805 100755 (executable)
@@ -29,6 +29,7 @@ my %feature = (
     postderef       => 'postderef',
     array_base      => 'arybase',
     current_sub     => '__SUB__',
+    lvalue_refs     => 'lvref',
     lexical_subs    => 'lexsubs',
     postderef_qq    => 'postderef_qq',
     unicode_eval    => 'unieval',