summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-11-17 15:47:02 -0700
committerKarl Williamson <khw@cpan.org>2018-11-27 09:54:46 -0700
commit51fa1a74ca7dc85c6e81e990c50128380cac9da5 (patch)
treea965568655dbed070a4fe98d3c769b1722a62a9d /regcomp.c
parent89c8f482fd6302a33e3a6ba5e76b545822ae66fc (diff)
downloadperl-51fa1a74ca7dc85c6e81e990c50128380cac9da5.tar.gz
regcomp.c: Use common code instead of duplicating it
The common code is about to get more complicated, so use it instead of a copy.
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c9
1 files changed, 1 insertions, 8 deletions
diff --git a/regcomp.c b/regcomp.c
index ff26f2242f..04be7373d8 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -14169,14 +14169,7 @@ S_regatom(pTHX_ RExC_state_t *pRExC_state, I32 *flagp, U32 depth)
/* Here, continuing a node with non-folded characters. Add
* this one */
-
- if (UVCHR_IS_INVARIANT(ender) || ! UTF) {
- *(s++) = (char) ender;
- }
- else {
- s = (char *) uvchr_to_utf8((U8 *) s, ender);
- added_len = UVCHR_SKIP(ender);
- }
+ goto not_fold_common;
}
else { /* Here, does participate in some fold */