diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-17 23:43:59 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-17 23:43:59 +0000 |
commit | b363f7ed458679f785ff5f459a6ae701688eb6f5 (patch) | |
tree | d1d739a0d522d5a7669690df46c1531ff207ca3e /embedvar.h | |
parent | 32e30700cf966bf527dceb0482a205346d2d955f (diff) | |
download | perl-b363f7ed458679f785ff5f459a6ae701688eb6f5.tar.gz |
PL_malloc_mutex needs to be global, not per-interpreter
(malloc.c has static data)
p4raw-id: //depot/perl@4403
Diffstat (limited to 'embedvar.h')
-rw-r--r-- | embedvar.h | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/embedvar.h b/embedvar.h index 22a970ac55..b018119e3c 100644 --- a/embedvar.h +++ b/embedvar.h @@ -304,7 +304,6 @@ #define PL_main_cv (PERL_GET_INTERP->Imain_cv) #define PL_main_root (PERL_GET_INTERP->Imain_root) #define PL_main_start (PERL_GET_INTERP->Imain_start) -#define PL_malloc_mutex (PERL_GET_INTERP->Imalloc_mutex) #define PL_max_intro_pending (PERL_GET_INTERP->Imax_intro_pending) #define PL_maxo (PERL_GET_INTERP->Imaxo) #define PL_maxsysfd (PERL_GET_INTERP->Imaxsysfd) @@ -581,7 +580,6 @@ #define PL_main_cv (vTHX->Imain_cv) #define PL_main_root (vTHX->Imain_root) #define PL_main_start (vTHX->Imain_start) -#define PL_malloc_mutex (vTHX->Imalloc_mutex) #define PL_max_intro_pending (vTHX->Imax_intro_pending) #define PL_maxo (vTHX->Imaxo) #define PL_maxsysfd (vTHX->Imaxsysfd) @@ -860,7 +858,6 @@ #define PL_Imain_cv PL_main_cv #define PL_Imain_root PL_main_root #define PL_Imain_start PL_main_start -#define PL_Imalloc_mutex PL_malloc_mutex #define PL_Imax_intro_pending PL_max_intro_pending #define PL_Imaxo PL_maxo #define PL_Imaxsysfd PL_maxsysfd @@ -1285,6 +1282,7 @@ #define PL_curinterp (PL_Vars.Gcurinterp) #define PL_do_undump (PL_Vars.Gdo_undump) #define PL_hexdigit (PL_Vars.Ghexdigit) +#define PL_malloc_mutex (PL_Vars.Gmalloc_mutex) #define PL_patleave (PL_Vars.Gpatleave) #else /* !PERL_GLOBAL_STRUCT */ @@ -1294,6 +1292,7 @@ #define PL_Gcurinterp PL_curinterp #define PL_Gdo_undump PL_do_undump #define PL_Ghexdigit PL_hexdigit +#define PL_Gmalloc_mutex PL_malloc_mutex #define PL_Gpatleave PL_patleave #endif /* PERL_GLOBAL_STRUCT */ |