diff options
Diffstat (limited to 'dquote_static.c')
-rw-r--r-- | dquote_static.c | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/dquote_static.c b/dquote_static.c index 15d168fbd4..2fcb0faea6 100644 --- a/dquote_static.c +++ b/dquote_static.c @@ -15,11 +15,7 @@ Pulled from regcomp.c. */ PERL_STATIC_INLINE I32 -S_regcurly(pTHX_ const char *s, - const bool rbrace_must_be_escaped /* Should the terminating '} be - preceded by a backslash? This - is an abnormal case */ - ) +S_regcurly(pTHX_ const char *s) { PERL_UNUSED_CONTEXT; PERL_ARGS_ASSERT_REGCURLY; @@ -36,9 +32,7 @@ S_regcurly(pTHX_ const char *s, s++; } - return (rbrace_must_be_escaped) - ? *s == '\\' && *(s+1) == '}' - : *s == '}'; + return *s == '}'; } /* XXX Add documentation after final interface and behavior is decided */ |