diff options
author | Father Chrysostomos <sprout@cpan.org> | 2013-09-15 16:20:58 -0700 |
---|---|---|
committer | Ricardo Signes <rjbs@cpan.org> | 2013-10-05 14:20:09 -0400 |
commit | b9a36c95eb3774221010dacb932ad1c45b709677 (patch) | |
tree | 4315ca5945ae52645b36036240a956edbc7c488a | |
parent | 76eba8ab520b5c85d3a1566e1ae17ca49faeccf1 (diff) | |
download | perl-b9a36c95eb3774221010dacb932ad1c45b709677.tar.gz |
Add postderef feature feature
-rw-r--r-- | feature.h | 6 | ||||
-rw-r--r-- | lib/feature.pm | 3 | ||||
-rwxr-xr-x | regen/feature.pl | 1 |
3 files changed, 9 insertions, 1 deletions
@@ -67,6 +67,12 @@ FEATURE_IS_ENABLED("evalbytes")) \ ) +#define FEATURE_POSTDEREF_IS_ENABLED \ + ( \ + CURRENT_FEATURE_BUNDLE == FEATURE_BUNDLE_CUSTOM && \ + FEATURE_IS_ENABLED("postderef") \ + ) + #define FEATURE_ARYBASE_IS_ENABLED \ ( \ CURRENT_FEATURE_BUNDLE <= FEATURE_BUNDLE_511 \ diff --git a/lib/feature.pm b/lib/feature.pm index 78fae2e7cb..eb1e85c6a3 100644 --- a/lib/feature.pm +++ b/lib/feature.pm @@ -13,6 +13,7 @@ our %feature = ( state => 'feature_state', switch => 'feature_switch', evalbytes => 'feature_evalbytes', + postderef => 'feature_postderef', array_base => 'feature_arybase', current_sub => 'feature___SUB__', lexical_subs => 'feature_lexsubs', @@ -24,7 +25,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 say state switch unicode_eval unicode_strings)], + "all" => [qw(array_base current_sub evalbytes fc lexical_subs postderef say state switch unicode_eval unicode_strings)], "default" => [qw(array_base)], ); diff --git a/regen/feature.pl b/regen/feature.pl index 377cd71264..41840ab66a 100755 --- a/regen/feature.pl +++ b/regen/feature.pl @@ -26,6 +26,7 @@ my %feature = ( state => 'state', switch => 'switch', evalbytes => 'evalbytes', + postderef => 'postderef', array_base => 'arybase', current_sub => '__SUB__', lexical_subs => 'lexsubs', |