diff options
| author | Wolfgang Laun <Wolfgang.Laun@alcatel.at> | 2001-12-10 09:45:20 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-10 13:21:06 +0000 |
| commit | 938681fbc4f98ef6c7230c5adcd4b8b4aa4d74c6 (patch) | |
| tree | fc3a8635b7ba1b88b50beccf94b5121b15fa2f01 /pp_pack.c | |
| parent | 21409f94df73d6bbc04f94530d7e09c7ca360058 (diff) | |
| download | perl-938681fbc4f98ef6c7230c5adcd4b8b4aa4d74c6.tar.gz | |
Re: [ID 20011209.005] perl "u2" eats RAM
Message-ID: <3C146810.60B5B7C0@alcatel.at>
p4raw-id: //depot/perl@13592
Diffstat (limited to 'pp_pack.c')
| -rw-r--r-- | pp_pack.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1843,7 +1843,7 @@ PP(pp_pack) fromstr = NEXTFROM; aptr = SvPV(fromstr, fromlen); SvGROW(cat, fromlen * 4 / 3); - if (len <= 1) + if (len <= 2) len = 45; else len = len / 3 * 3; |