summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorGerard Goossen <gerard@ggoossen.net>2011-08-09 20:35:06 +0200
committerFather Chrysostomos <sprout@cpan.org>2011-08-11 09:07:14 -0700
commiteb796c7f1a47acbd996034731639c1bb76e31a19 (patch)
treece561de43080ad2dc8c9a59d417dbd873faf1b80 /embed.fnc
parent86a64801a038eae8c8c1c6f0ba6a8b40aeb8fa8d (diff)
downloadperl-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.fnc2
1 files changed, 1 insertions, 1 deletions
diff --git a/embed.fnc b/embed.fnc
index e2309108b4..4da1d75eec 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -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