diff options
| author | Karl Williamson <khw@cpan.org> | 2022-10-04 05:04:32 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2022-10-10 13:12:22 -0600 |
| commit | 3d3bea996b3b73e474a80a4fde19459ea89dbeff (patch) | |
| tree | 3b20cd0aa2f2ebd1a3a01350001049d8f5cd17b1 /embed.fnc | |
| parent | e88d6362ca2333867768f8bd4b668b12545a87bf (diff) | |
| download | perl-3d3bea996b3b73e474a80a4fde19459ea89dbeff.tar.gz | |
locale.c: Generalize static functions
This changes these functions to take the code page as input, instead of
being just UTF-8. Macros are created to call them with UTF-8.
I'm doing this because there is no loss of efficiency, and it is
somewhat jarring, given Perl terminology, to call a function with 'Byte'
in the name with a parameter with 'utf8' in the name.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -3426,8 +3426,10 @@ S |void |print_collxfrm_input_and_return \ # endif # ifdef WIN32 S |char* |win32_setlocale|int category|NULLOK const char* locale -ST |wchar_t *|Win_utf8_string_to_wstring|NULLOK const char * utf8_string -ST |char * |Win_wstring_to_utf8_string|NULLOK const wchar_t * wstring +ST |wchar_t *|Win_byte_string_to_wstring|const UINT code_page \ + |NULLOK const char * byte_string +ST |char * |Win_wstring_to_byte_string|const UINT code_page \ + |NULLOK const wchar_t * wstring S |char *|wrap_wsetlocale |const int category \ |NULLOK const char *locale # endif |