From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 17 May 2005 13:27:43 +0000 (+0000)
Subject: One last 1008 to replace with PERL_ARENA_SIZE
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2e7ed132d3ea6a9040a623e3541f25dd0709096b;p=p5sagit%2Fp5-mst-13.2.git

One last 1008 to replace with PERL_ARENA_SIZE

p4raw-id: //depot/perl@24491
---

diff --git a/sv.c b/sv.c
index 9e8af5d..799cf52 100644
--- a/sv.c
+++ b/sv.c
@@ -209,8 +209,8 @@ S_more_sv(pTHX)
     }
     else {
 	char *chunk;                /* must use New here to match call to */
-	New(704,chunk,1008,char);   /* Safefree() in sv_free_arenas()     */
-	sv_add_arena(chunk, 1008, 0);
+	New(704,chunk,PERL_ARENA_SIZE,char);   /* Safefree() in sv_free_arenas()     */
+	sv_add_arena(chunk, PERL_ARENA_SIZE, 0);
     }
     uproot_SV(sv);
     return sv;