diff options
author | Karl Williamson <khw@cpan.org> | 2022-12-17 08:34:33 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2022-12-20 05:53:42 -0700 |
commit | cb777d7125776d73756033f32e5e2040a8826cc1 (patch) | |
tree | e278c7efa631e6f0cbe914eefa6366a3ccfa1d66 /embed.fnc | |
parent | 107344d01c0fc2b6c4ff9c599fddfb6d704bfb92 (diff) | |
download | perl-cb777d7125776d73756033f32e5e2040a8826cc1.tar.gz |
Fix broken API: sync_locale()
This fixes GH #20565.
Lack of tests allowed sync_locale() to get broken until CPAN testing
showed it so.
Basically, I blew it in 9f5a615be674d7663d3b4719849baa1ba3027f5b. Most
egregiously, I forgot to turn back on when a sync_locale() is executed,
the toggling for locales whose radix character isn't a dot. And this
needs a way to tell the other code that it needs to recompute things at
this time, since our records don't reflect what happened before the
sync.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -3388,13 +3388,13 @@ ST |const char *|save_to_buffer|NULLOK const char * string \ |NULLOK Size_t *buf_size ST |unsigned int|get_category_index|const int category|NULLOK const char * locale # ifdef USE_LOCALE_CTYPE -S |void |new_ctype |NN const char* newctype +S |void |new_ctype |NN const char* newctype|bool force ST |bool |is_codeset_name_UTF8|NN const char * name # endif # ifdef USE_LOCALE_NUMERIC -S |void |new_numeric |NN const char* newnum +S |void |new_numeric |NN const char* newnum|bool force # endif -S |void |new_LC_ALL |NULLOK const char* unused +S |void |new_LC_ALL |NULLOK const char* unused|bool force S |const char*|stdize_locale|const int category \ |NULLOK const char* input_locale \ |NULLOK const char **buf \ @@ -3458,7 +3458,7 @@ S |const char *|calculate_LC_ALL|NN const char ** individ_locales # endif # endif # ifdef USE_LOCALE_COLLATE -S |void |new_collate |NN const char* newcoll +S |void |new_collate |NN const char* newcoll|bool force # ifdef DEBUGGING S |void |print_collxfrm_input_and_return \ |NN const char * s \ |