summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2016-02-13 13:49:00 -0700
committerKarl Williamson <khw@cpan.org>2016-02-18 20:26:49 -0700
commitfe0a36465f2c9353aeec20e4a5d22f6681bb28bb (patch)
tree1bc68f1028d8538cf6061513e2a6176d09d99865 /proto.h
parenta60b792277ab2836704066899135e8d4c83b0f0c (diff)
downloadperl-fe0a36465f2c9353aeec20e4a5d22f6681bb28bb.tar.gz
Don't allow /\N{}/ under 're strict'
This is the one remaining empty {} that was accepted under the experimental 'use re "strict"'.
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/proto.h b/proto.h
index 4f2d6871a5..c3adf2d211 100644
--- a/proto.h
+++ b/proto.h
@@ -4747,7 +4747,7 @@ PERL_STATIC_INLINE STRLEN* S_get_invlist_iter_addr(SV* invlist)
#define PERL_ARGS_ASSERT_GET_INVLIST_ITER_ADDR \
assert(invlist)
-STATIC bool S_grok_bslash_N(pTHX_ RExC_state_t *pRExC_state, regnode** nodep, UV *code_point_p, int* cp_count, I32 *flagp, const U32 depth);
+STATIC bool S_grok_bslash_N(pTHX_ RExC_state_t *pRExC_state, regnode** nodep, UV *code_point_p, int* cp_count, I32 *flagp, const bool strict, const U32 depth);
#define PERL_ARGS_ASSERT_GROK_BSLASH_N \
assert(pRExC_state); assert(flagp)
PERL_STATIC_INLINE regnode* S_handle_named_backref(pTHX_ RExC_state_t *pRExC_state, I32 *flagp, char * parse_start, char ch);