From 932f250ae5a4b943088b89b713cf4cb8c54821ae Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Mon, 12 Apr 2021 20:42:14 -0600 Subject: [PATCH] sv.c: Rmv redundant clause If threaded locales are being used, basic locales are too. No need to check both --- sv.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/sv.c b/sv.c index 457cb97945d6..510b3e3cc6a1 100644 --- a/sv.c +++ b/sv.c @@ -15339,7 +15339,8 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags, /* Did the locale setup indicate UTF-8? */ PL_utf8locale = proto_perl->Iutf8locale; -#if defined(USE_LOCALE) && defined(USE_LOCALE_THREADS) + +#if defined(USE_LOCALE_THREADS) assert(PL_locale_mutex_depth <= 0); PL_locale_mutex_depth = 0; #endif