From: Tim Bunce <Tim.Bunce@pobox.com>
Date: Thu, 4 Oct 2012 17:42:58 +0000 (+0100)
Subject: Skip nest invalidated by 5.17 change
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cf9f86740b72fe81e5d45c8f1a267573c59bfd5f;p=p5sagit%2FDevel-Size.git

Skip nest invalidated by 5.17 change
---

diff --git a/t/code.t b/t/code.t
index c0dafe6..ed06d12 100644
--- a/t/code.t
+++ b/t/code.t
@@ -15,8 +15,11 @@ my $swoosh_size = total_size(\&swoosh);
 my $crunch_size = total_size(\&crunch);
 
 cmp_ok($whack_size, '>', 0, 'CV generated at runtime has a size');
-cmp_ok($zwapp_size, '>', $whack_size,
-       'CV stubbed at compiletime is larger (CvOUTSIDE is set and followed)');
+if ($] < 5.017) { # blead 186a5ba82d5844e9713475c494fcd6682968609f
+    cmp_ok($zwapp_size, '>', $whack_size,
+        'CV stubbed at compiletime is larger (CvOUTSIDE is set and followed)');
+}
+else { pass() }
 cmp_ok(length prototype \&swoosh, '>', 0, 'prototype has a length');
 cmp_ok($swoosh_size, '>', $zwapp_size + length prototype \&swoosh,
        'prototypes add to the size');