+5
-0
lines changedFilter options
+5
-0
lines changed Original file line number Diff line number Diff line change
@@ -4790,6 +4790,11 @@ Perl_init_i18nl10n(pTHX_ int printwarn)
4790
4790
DEBUG_Lv(PerlIO_printf(Perl_debug_log, "created C object %p\n",
4791
4791
PL_C_locale_obj));
4792
4792
4793
+
/* Switch to using the POSIX 2008 interface now. This would happen below
4794
+
* anyway, but deferring it can lead to leaks of memory that would also get
4795
+
* malloc'd in the interim */
4796
+
uselocale(PL_C_locale_obj);
4797
+
4793
4798
# ifdef USE_LOCALE_NUMERIC
4794
4799
4795
4800
PL_underlying_numeric_obj = duplocale(PL_C_locale_obj);
You can’t perform that action at this time.
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4