diff options
| author | Gisle Aas <gisle@aas.no> | 1998-07-04 03:04:08 +0200 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-04 05:46:42 +0000 |
| commit | 8fb9a439a71a5e6b7adf7c46052298d23dd9cab7 (patch) | |
| tree | 0786b4c9b7390da0c87e4b645ef68c51f208ffbf /perl.c | |
| parent | 0c5b80af98159ce0a56841f0a002e78a266b5f09 (diff) | |
| download | perl-8fb9a439a71a5e6b7adf7c46052298d23dd9cab7.tar.gz | |
add patch preextend global string table, tweak for 512 entries
Subject: Re: [PATCH] Re: perl5.004_69 core dump
Message-ID: <m3ra02v8nr.fsf@furu.g.aas.no>
p4raw-id: //depot/perl@1305
Diffstat (limited to 'perl.c')
| -rw-r--r-- | perl.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -1859,8 +1859,7 @@ init_main_stash(void) It is properly deallocated in perl_destruct() */ strtab = newHV(); HvSHAREKEYS_off(strtab); /* mandatory */ - Newz(506,((XPVHV*)SvANY(strtab))->xhv_array, - sizeof(HE*) * (((XPVHV*)SvANY(strtab))->xhv_max + 1), char); + hv_ksplit(strtab, 512); curstash = defstash = newHV(); curstname = newSVpv("main",4); |