summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-03-27 15:56:30 -0600
committerKarl Williamson <khw@cpan.org>2018-03-31 15:36:46 -0600
commit58a3ba2c60c551bd0f1655ca575d700688421a8c (patch)
tree7003fc7ed7ef1126ddad3613cb1e144b0be5f0b4 /sv.c
parent9e71ecc3058240ecb03bef0a24a00a635bd8e8f0 (diff)
downloadperl-58a3ba2c60c551bd0f1655ca575d700688421a8c.tar.gz
Remove obsolete variables
These were for when some of the Posix character classes were implemented as swashes, which is no longer the case, so these can be removed.
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/sv.c b/sv.c
index 54a45086aa..d38ccdcb91 100644
--- a/sv.c
+++ b/sv.c
@@ -15587,9 +15587,6 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
PL_InBitmap = sv_dup_inc(proto_perl->IInBitmap, param);
/* utf8 character class swashes */
- for (i = 0; i < POSIX_SWASH_COUNT; i++) {
- PL_utf8_swash_ptrs[i] = sv_dup_inc(proto_perl->Iutf8_swash_ptrs[i], param);
- }
PL_seen_deprecated_macro = hv_dup_inc(proto_perl->Iseen_deprecated_macro, param);
PL_utf8_mark = sv_dup_inc(proto_perl->Iutf8_mark, param);