summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-12-17 08:34:33 -0700
committerKarl Williamson <khw@cpan.org>2022-12-20 05:53:42 -0700
commitcb777d7125776d73756033f32e5e2040a8826cc1 (patch)
treee278c7efa631e6f0cbe914eefa6366a3ccfa1d66 /embed.fnc
parent107344d01c0fc2b6c4ff9c599fddfb6d704bfb92 (diff)
downloadperl-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.fnc8
1 files changed, 4 insertions, 4 deletions
diff --git a/embed.fnc b/embed.fnc
index dd4e92e538..7e4863a514 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -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 \