diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-12-22 20:37:59 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-24 09:25:17 -0800 |
commit | 2846acbffa436a8a6bda1f5b38257b700500bbf0 (patch) | |
tree | 387345b45ef14619880d4b8c9aa4c1a5f903c5bb /op.c | |
parent | e233f0c5ea875bcd70051a941babeb77361bdac1 (diff) | |
download | perl-2846acbffa436a8a6bda1f5b38257b700500bbf0.tar.gz |
Use new feature-testing macros
Instead of using FEATURE_IS_ENABLED("say"), etc., now use
FEATURE_SAY_IS_ENABLED instead. These new macros, in feature.h, also
check feature bundle hints in PL_hints, so we can start using those
hints. Two commits ago, feature.pm started setting them.
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -102,6 +102,7 @@ recursive, but it's recursive on basic blocks, not on tree nodes. #define PERL_IN_OP_C #include "perl.h" #include "keywords.h" +#include "feature.h" #define CALL_PEEP(o) PL_peepp(aTHX_ o) #define CALL_RPEEP(o) PL_rpeepp(aTHX_ o) @@ -7554,7 +7555,7 @@ Perl_ck_eval(pTHX_ OP *o) o->op_private |= OPpEVAL_HAS_HH; if (!(o->op_private & OPpEVAL_BYTES) - && FEATURE_IS_ENABLED("unieval")) + && FEATURE_UNIEVAL_IS_ENABLED) o->op_private |= OPpEVAL_UNICODE; } return o; |