Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- diff --git a/Declare.xs b/Declare.xs
- index c0c7d7b..edfbc0d 100644
- --- a/Declare.xs
- +++ b/Declare.xs
- @@ -330,6 +330,10 @@ STATIC OP *dd_ck_const(pTHX_ OP *o, void *user_data) {
- PERL_UNUSED_VAR(user_data);
- + if (DD_HAVE_PARSER && PL_expect == XOPERATOR) {
- + return o;
- + }
- +
- /* if this is set, we just grabbed a delimited string or something,
- not a bareword, so NO TOUCHY */
Add Comment
Please, Sign In to add comment