diff options
author | Karl Williamson <khw@cpan.org> | 2015-03-09 11:55:58 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2015-03-09 12:05:15 -0600 |
commit | e6cc39caa0e031d6a42625049e59c6e5ecba7e51 (patch) | |
tree | cff8392db30bc0dcc49e267868428f560f2b5a2c | |
parent | 54bdcd8ec4c7b2111381943f4fdd4a07d3fe1bf9 (diff) | |
download | perl-e6cc39caa0e031d6a42625049e59c6e5ecba7e51.tar.gz |
embed.fnc: Change _warn_problematic_locale() function from public
Spotted by Daniel Dragan
-rw-r--r-- | embed.fnc | 2 | ||||
-rw-r--r-- | embed.h | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -1134,7 +1134,7 @@ ApOM |int |init_i18nl14n |int printwarn ApM |char* |my_strerror |const int errnum ApOM |void |new_collate |NULLOK const char* newcoll ApOM |void |new_ctype |NN const char* newctype -ApMn |void |_warn_problematic_locale +EXpMn |void |_warn_problematic_locale ApOM |void |new_numeric |NULLOK const char* newcoll Ap |void |set_numeric_local Ap |void |set_numeric_radix @@ -45,7 +45,6 @@ #define _to_utf8_lower_flags(a,b,c,d) Perl__to_utf8_lower_flags(aTHX_ a,b,c,d) #define _to_utf8_title_flags(a,b,c,d) Perl__to_utf8_title_flags(aTHX_ a,b,c,d) #define _to_utf8_upper_flags(a,b,c,d) Perl__to_utf8_upper_flags(aTHX_ a,b,c,d) -#define _warn_problematic_locale Perl__warn_problematic_locale #define amagic_call(a,b,c,d) Perl_amagic_call(aTHX_ a,b,c,d) #define amagic_deref_call(a,b) Perl_amagic_deref_call(aTHX_ a,b) #define append_utf8_from_native_byte S_append_utf8_from_native_byte @@ -898,6 +897,7 @@ #endif #if defined(PERL_CORE) || defined(PERL_EXT) #define _get_encoding() Perl__get_encoding(aTHX) +#define _warn_problematic_locale Perl__warn_problematic_locale #define av_reify(a) Perl_av_reify(aTHX_ a) #define current_re_engine() Perl_current_re_engine(aTHX) #define cv_ckproto_len_flags(a,b,c,d,e) Perl_cv_ckproto_len_flags(aTHX_ a,b,c,d,e) |