stdize_locale not used in POSIX.

3 files changed, 7 insertions, 2 deletions

diff --git a/embed.fnc b/embed.fnc
index a7579524a8..963a00f5f7 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -2429,9 +2429,12 @@ s	|bool	|isa_lookup	|NN HV *stash|NN const char * const name \
                                         |STRLEN len|U32 flags
 #endif
 
+#if defined(USE_LOCALE) && defined(PERL_IN_LOCALE_C)
+s	|char*	|stdize_locale	|NN char* locs
+#endif
+
 #if defined(USE_LOCALE) \
     && (defined(PERL_IN_LOCALE_C) || defined (PERL_EXT_POSIX))
-s	|char*	|stdize_locale	|NN char* locs
 ApM	|bool	|_is_cur_LC_category_utf8|int category
 #endif
 
diff --git a/embed.h b/embed.h
index b24a093938..2bf125e658 100644
--- a/embed.h
+++ b/embed.h
@@ -1771,7 +1771,7 @@
 #define padname_dup(a,b)	Perl_padname_dup(aTHX_ a,b)
 #define padnamelist_dup(a,b)	Perl_padnamelist_dup(aTHX_ a,b)
 #  endif
-#  if defined(USE_LOCALE)     && (defined(PERL_IN_LOCALE_C) || defined (PERL_EXT_POSIX))
+#  if defined(USE_LOCALE) && defined(PERL_IN_LOCALE_C)
 #define stdize_locale(a)	S_stdize_locale(aTHX_ a)
 #  endif
 #  if defined(USE_LOCALE_COLLATE)
diff --git a/proto.h b/proto.h
index e39a4b41a4..3345d1cfa0 100644
--- a/proto.h
+++ b/proto.h
@@ -8154,6 +8154,8 @@ PERL_CALLCONV SV*	Perl_sv_dup_inc(pTHX_ const SV *const sstr, CLONE_PARAMS *cons
 #endif
 #if defined(USE_LOCALE)     && (defined(PERL_IN_LOCALE_C) || defined (PERL_EXT_POSIX))
 PERL_CALLCONV bool	Perl__is_cur_LC_category_utf8(pTHX_ int category);
+#endif
+#if defined(USE_LOCALE) && defined(PERL_IN_LOCALE_C)
 STATIC char*	S_stdize_locale(pTHX_ char* locs)
 			__attribute__nonnull__(pTHX_1);
 #define PERL_ARGS_ASSERT_STDIZE_LOCALE	\