diff options
author | Gerard Goossen <gerard@ggoossen.net> | 2011-08-09 20:35:06 +0200 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-08-11 09:07:14 -0700 |
commit | eb796c7f1a47acbd996034731639c1bb76e31a19 (patch) | |
tree | ce561de43080ad2dc8c9a59d417dbd873faf1b80 /embed.fnc | |
parent | 86a64801a038eae8c8c1c6f0ba6a8b40aeb8fa8d (diff) | |
download | perl-eb796c7f1a47acbd996034731639c1bb76e31a19.tar.gz |
Move bareword checking from the peephole optimizer to finalize_optree. Fixes [perl #95998]
The bareword checking is moved from the peephole optimizer to finalize_optree.
newRANGE needs additional bareword checking because the constants may
be optimized away by 'gen_constant_list'.
The OPpCONST_STRICT flag is removed after giving an error about a
bareword to prevent giving multiple errors about the same bareword.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1641,7 +1641,7 @@ s |OP * |dup_attrlist |NN OP *o s |void |apply_attrs |NN HV *stash|NN SV *target|NULLOK OP *attrs|bool for_my s |void |apply_attrs_my |NN HV *stash|NN OP *target|NULLOK OP *attrs|NN OP **imopsp s |void |bad_type |I32 n|NN const char *t|NN const char *name|NN const OP *kid -s |void |no_bareword_allowed|NN const OP *o +s |void |no_bareword_allowed|NN OP *o sR |OP* |no_fh_allowed|NN OP *o sR |OP* |too_few_arguments|NN OP *o|NN const char* name sR |OP* |too_many_arguments|NN OP *o|NN const char* name |