From: Nicholas Clark Date: Sun, 17 Apr 2011 12:07:34 +0000 (+0100) Subject: Remove dead code: #if PERL_VERSION <= 8 then PERL_VERSION is definitely < 11. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=274594bc1da73fbf76d3f7326137cce1a3ac560f;p=p5sagit%2FDevel-Size.git Remove dead code: #if PERL_VERSION <= 8 then PERL_VERSION is definitely < 11. --- diff --git a/Size.xs b/Size.xs index 6ed0c2b..de1646c 100644 --- a/Size.xs +++ b/Size.xs @@ -589,11 +589,7 @@ thing_size(pTHX_ const SV * const orig_thing, struct state *st) { #if PERL_VERSION <= 8 case SVt_PVBM: TAG; total_size += sizeof(XPVBM); -#if (PERL_VERSION < 11) total_size += SvROK(thing) ? thing_size(aTHX_ SvRV(thing), st) : SvLEN(thing); -#else - total_size += SvLEN(thing); -#endif total_size += magic_size(thing, st); TAG;break; #endif