diff options
| author | Karl Williamson <khw@cpan.org> | 2018-04-09 10:43:06 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2018-04-20 01:11:51 -0600 |
| commit | 95e064d9059a4371bc291235b71f81066dfdd08b (patch) | |
| tree | 8fddb88c62a66e8af95e59fc2b9c111a2eedb92c /embed.h | |
| parent | 4273b0cccad37ddd85afb1abe763af2c6a6023a5 (diff) | |
| download | perl-95e064d9059a4371bc291235b71f81066dfdd08b.tar.gz | |
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
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -1441,6 +1441,7 @@ #define init_constants() Perl_init_constants(aTHX) #define init_debugger() Perl_init_debugger(aTHX) #define init_named_cv(a,b) Perl_init_named_cv(aTHX_ a,b) +#define init_uniprops() Perl_init_uniprops(aTHX) #define invert(a) Perl_invert(aTHX_ a) #define io_close(a,b,c,d) Perl_io_close(aTHX_ a,b,c,d) #define isinfnansv(a) Perl_isinfnansv(aTHX_ a) |