From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 5 Feb 2006 20:33:57 +0000 (+0000)
Subject: new_body_type doesn't need to subtract the offset, that's what
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a0b3770757d86e2863789acd09d8b956e3799b44;p=p5sagit%2Fp5-mst-13.2.git

new_body_type doesn't need to subtract the offset, that's what
new_body_allocated is for.

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

diff --git a/sv.c b/sv.c
index 3f00951..36cea18 100644
--- a/sv.c
+++ b/sv.c
@@ -970,8 +970,7 @@ static const struct body_details bodies_by_type[] = {
 };
 
 #define new_body_type(sv_type)			\
-    (void *)((char *)S_new_body(aTHX_ bodies_by_type[sv_type].size, sv_type)\
-	     - bodies_by_type[sv_type].offset)
+    (void *)((char *)S_new_body(aTHX_ bodies_by_type[sv_type].size, sv_type))
 
 #define del_body_type(p, sv_type)	\
     del_body(p, &PL_body_roots[sv_type])