summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2014-09-20 11:12:37 -0700
committerFather Chrysostomos <sprout@cpan.org>2014-10-10 21:53:47 -0700
commit7b1dc818da6dbd8d997858a2acf6a6edf11757e0 (patch)
tree5e93c81165ac528dbd8b07e40c2b57b11c677bbe
parent82f82fdb58cb3bf9651ec1ba6904780eb1105021 (diff)
downloadperl-7b1dc818da6dbd8d997858a2acf6a6edf11757e0.tar.gz
Add lvalue_refs feature feature
-rw-r--r--feature.h6
-rw-r--r--lib/feature.pm3
-rwxr-xr-xregen/feature.pl1
3 files changed, 9 insertions, 1 deletions
diff --git a/feature.h b/feature.h
index 698302c43f..c6c71e331e 100644
--- a/feature.h
+++ b/feature.h
@@ -93,6 +93,12 @@
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 && \
diff --git a/lib/feature.pm b/lib/feature.pm
index 89765c6c91..aabedd8601 100644
--- a/lib/feature.pm
+++ b/lib/feature.pm
@@ -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)],
);
diff --git a/regen/feature.pl b/regen/feature.pl
index c9a4cd6588..62f5805c6e 100755
--- a/regen/feature.pl
+++ b/regen/feature.pl
@@ -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',