diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-10 04:57:07 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-10 04:57:07 +0000 |
commit | 59bd0823b6625605b67ec19bd9bcc4dd06530e7e (patch) | |
tree | c458c6636e5d8beb343d9a9b8fdec8f949f42584 /perl.c | |
parent | cb8129f94a333dfcf2cb8cf5b66784f951fc14de (diff) | |
download | perl-59bd0823b6625605b67ec19bd9bcc4dd06530e7e.tar.gz |
Renaming tweaks, and split off the reentrant "superbuffer"
init routine.
p4raw-id: //depot/perl@15139
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -264,8 +264,7 @@ perl_construct(pTHXx) PL_regex_pad = AvARRAY(PL_regex_padav); #endif #ifdef USE_REENTRANT_API - New(31337, PL_reentrant_buffer,1, REBUF); - New(31337, PL_reentrant_buffer->tmbuff,1, struct tm); + Perl_reentrant_init(aTHX); #endif /* Note that strtab is a rather special HV. Assumptions are made @@ -836,7 +835,7 @@ perl_destruct(pTHXx) #endif /* USE_5005THREADS */ #ifdef USE_REENTRANT_API - Safefree(PL_reentrant_buffer->tmbuff); + Safefree(PL_reentrant_buffer->tmbuf); Safefree(PL_reentrant_buffer); #endif |