most globals are now interpreter local; locale initialization

was too early, defer it until interpreter is allocated and
initialized; multiple interpreters should now be
concurrency-safe (untested)

p4raw-id: //depot/perl@3527

1 files changed, 1 insertions, 0 deletions

diff --git a/perl.c b/perl.c
index 976b7b5f23..29eba5bab0 100644
--- a/perl.c
+++ b/perl.c
@@ -178,6 +178,7 @@ perl_construct(register PerlInterpreter *my_perl)
     JMPENV_BOOTSTRAP;
     STATUS_ALL_SUCCESS;
 
+    init_i18nl10n(1);
     SET_NUMERIC_STANDARD();
 #if defined(PERL_SUBVERSION) && PERL_SUBVERSION > 0
     sprintf(PL_patchlevel, "%7.5f",   (double) PERL_REVISION