summaryrefslogtreecommitdiff
path: root/dquote_static.c
diff options
context:
space:
mode:
Diffstat (limited to 'dquote_static.c')
-rw-r--r--dquote_static.c10
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 */