From: Nicholas Clark Date: Fri, 18 Nov 2005 23:44:32 +0000 (+0000) Subject: Remove all the now unused new_XFOO()/del_XFOO() macros X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=89e6eba15d11fe2c88c5f730266690dac444f520;p=p5sagit%2Fp5-mst-13.2.git Remove all the now unused new_XFOO()/del_XFOO() macros p4raw-id: //depot/perl@26170 --- diff --git a/sv.c b/sv.c index 3f70368..b8bada3 100644 --- a/sv.c +++ b/sv.c @@ -1323,18 +1323,9 @@ static const struct body_details bodies_by_type[] = { #define new_XNV() my_safemalloc(sizeof(XPVNV)) #define del_XNV(p) my_safefree(p) -#define new_XPV() my_safemalloc(sizeof(XPV)) -#define del_XPV(p) my_safefree(p) - -#define new_XPVIV() my_safemalloc(sizeof(XPVIV)) -#define del_XPVIV(p) my_safefree(p) - #define new_XPVNV() my_safemalloc(sizeof(XPVNV)) #define del_XPVNV(p) my_safefree(p) -#define new_XPVCV() my_safemalloc(sizeof(XPVCV)) -#define del_XPVCV(p) my_safefree(p) - #define new_XPVAV() my_safemalloc(sizeof(XPVAV)) #define del_XPVAV(p) my_safefree(p) @@ -1347,29 +1338,14 @@ static const struct body_details bodies_by_type[] = { #define new_XPVGV() my_safemalloc(sizeof(XPVGV)) #define del_XPVGV(p) my_safefree(p) -#define new_XPVLV() my_safemalloc(sizeof(XPVLV)) -#define del_XPVLV(p) my_safefree(p) - -#define new_XPVBM() my_safemalloc(sizeof(XPVBM)) -#define del_XPVBM(p) my_safefree(p) - #else /* !PURIFY */ #define new_XNV() new_body_type(SVt_NV) #define del_XNV(p) del_body_type(p, SVt_NV) -#define new_XPV() new_body_allocated(SVt_PV) -#define del_XPV(p) del_body_allocated(p, SVt_PV) - -#define new_XPVIV() new_body_allocated(SVt_PVIV) -#define del_XPVIV(p) del_body_allocated(p, SVt_PVIV) - #define new_XPVNV() new_body_type(SVt_PVNV) #define del_XPVNV(p) del_body_type(p, SVt_PVNV) -#define new_XPVCV() new_body_type(SVt_PVCV) -#define del_XPVCV(p) del_body_type(p, SVt_PVCV) - #define new_XPVAV() new_body_allocated(SVt_PVAV) #define del_XPVAV(p) del_body_allocated(p, SVt_PVAV) @@ -1382,12 +1358,6 @@ static const struct body_details bodies_by_type[] = { #define new_XPVGV() new_body_type(SVt_PVGV) #define del_XPVGV(p) del_body_type(p, SVt_PVGV) -#define new_XPVLV() new_body_type(SVt_PVLV) -#define del_XPVLV(p) del_body_type(p, SVt_PVLV) - -#define new_XPVBM() new_body_type(SVt_PVBM) -#define del_XPVBM(p) del_body_type(p, SVt_PVBM) - #endif /* PURIFY */ /* no arena for you! */ @@ -1397,14 +1367,6 @@ static const struct body_details bodies_by_type[] = { #define new_NOARENAZ(details) \ my_safecalloc((details)->size - (details)->offset) -#define new_XPVFM() my_safemalloc(sizeof(XPVFM)) -#define del_XPVFM(p) my_safefree(p) - -#define new_XPVIO() my_safemalloc(sizeof(XPVIO)) -#define del_XPVIO(p) my_safefree(p) - - - /* =for apidoc sv_upgrade