Change 34076 by [EMAIL PROTECTED] on 2008/06/21 14:33:18
Subject: Re: [perl #46381] "Out of memory ... sbrk()" on FreeBSD-6.x
for v.5.8.x but not v.5.6.x
From: Slaven Rezic <[EMAIL PROTECTED]>
Date: 26 Oct 2007 16:58:55 +0200
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/malloc.c#131 edit
Differences ...
==== //depot/perl/malloc.c#131 (text) ====
Index: perl/malloc.c
--- perl/malloc.c#130~33450~ 2008-03-06 10:02:22.000000000 -0800
+++ perl/malloc.c 2008-06-21 07:33:18.000000000 -0700
@@ -2293,6 +2293,8 @@
nmalloc[bucket]--;
nmalloc[pow * BUCKETS_PER_POW2]++;
#endif
+ if (pow * BUCKETS_PER_POW2 > max_bucket)
+ max_bucket = pow * BUCKETS_PER_POW2;
*(cp - M_OVERHEAD) = pow * BUCKETS_PER_POW2; /* Fill index. */
MALLOC_UNLOCK;
goto inplace_label;
End of Patch.
