Move inversion lists to utf8.c

These previously were statics in perl.c.  A future commit would need
access to these from regcomp.c.  We could create an access function in
perl.c so that regcomp.c could access them, or we could move them to
regcomp.c.  But doing that means also they would be statics in
re_comp.c, and that would mean two copies.

So that means an access function is needed.  Their use is really
unrelated to perl.c, which merely initializes them, so that could have
an access function instead.  But the most logical place for their home
is utf8.c, which is described as for Unicode things, not just UTF-8
things.

So this commit moves these inversion lists to utf8.c, and creates an
initialization function called on perl startup from perl.c

1 files changed, 1 insertions, 1 deletions

diff --git a/regen/mk_invlists.pl b/regen/mk_invlists.pl
index 1cf4cfa44b..a84bdb2403 100644
--- a/regen/mk_invlists.pl
+++ b/regen/mk_invlists.pl
@@ -147,7 +147,7 @@ sub output_invlist ($$;$) {
     }
     my $count = @$invlist;
 
-    switch_pound_if ($name, 'PERL_IN_PERL_C');
+    switch_pound_if ($name, 'PERL_IN_UTF8_C');
 
     print $out_fh "\nstatic const UV ${name}_invlist[] = {";
     print $out_fh " /* for $charset */" if $charset;