Stop \P{Assigned} from leaking

I suspect this leak also applies to any large character classes.

An HV created with newHV has a reference count of 1, so doing
newRV_inc on it will cause a leak.

1 files changed, 1 insertions, 1 deletions

diff --git a/utf8.c b/utf8.c
index 62b9135c03..829db7dcfc 100644
--- a/utf8.c
+++ b/utf8.c
@@ -2982,7 +2982,7 @@ Perl__core_swash_init(pTHX_ const char* pkg, const char* name, SV *listsv, I32 m
                  * we are going to return a swash */
                 if ((int) _invlist_len(invlist) > invlist_swash_boundary) {
                     swash_hv = newHV();
-                    retval = newRV_inc(MUTABLE_SV(swash_hv));
+                    retval = newRV_noinc(MUTABLE_SV(swash_hv));
                 }
 		swash_invlist = invlist;
 	    }