diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-08-24 14:00:22 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-08-25 23:21:29 -0600 |
| commit | 83199d386f82b5fcc56cdeded547bf6bad800018 (patch) | |
| tree | 37c15447f6e4fb7e10d086ce4d355f5d6636f4f3 /embed.fnc | |
| parent | de574e73f549b6438c8dfcf8623486003abaca82 (diff) | |
| download | perl-83199d386f82b5fcc56cdeded547bf6bad800018.tar.gz | |
utf8.c: Revise internal API of swash_init()
This revises the API for the version of swash_init() that is usable
by core Perl. The external interface is unaffected. There is now a
flags parameter to allow for future growth. And the core internal-only
function that returns if a swash has a user-defined property in it or
not has been removed. This information is now returned via the new
flags parameter upon initialization, and is unavailable afterwards.
This is to prepare for the flexibility to change the swash that is
needed in future commits.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 7 |
1 files changed, 3 insertions, 4 deletions
@@ -1418,15 +1418,14 @@ EXMpR |SV* |_add_range_to_invlist |NULLOK SV* invlist|const UV start|const UV en EXMp |void |_invlist_populate_swatch |NN SV* const invlist|const UV start|const UV end|NN U8* swatch #endif #if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_REGEXEC_C) || defined(PERL_IN_UTF8_C) -EXp |SV* |_core_swash_init|NN const char* pkg|NN const char* name|NN SV* listsv|I32 minbits \ - |I32 none|bool return_if_undef|NULLOK SV* invlist \ - |bool passed_in_invlist_has_user_defined_property +EXp |SV* |_core_swash_init|NN const char* pkg|NN const char* name \ + |NN SV* listsv|I32 minbits|I32 none|bool return_if_undef \ + |NULLOK SV* invlist|NULLOK U8* const flags_p EXMpR |SV* |_invlist_contents|NN SV* const invlist EiMR |UV* |_get_invlist_len_addr |NN SV* invlist EiMR |UV |_invlist_len |NN SV* const invlist EMiR |bool |_invlist_contains_cp|NN SV* const invlist|const UV cp EXpMR |IV |_invlist_search |NN SV* const invlist|const UV cp -EXMpR |bool |_is_swash_user_defined|NN SV* const swash EXMpR |SV* |_get_swash_invlist|NN SV* const swash #endif Ap |void |taint_env |