X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-Size.git;a=blobdiff_plain;f=t%2Fbasic.t;h=4166e2dbc1e315cc952cf21ad7856cec40b4be9d;hp=e39799a19ed23b66a554d1052331fe09c6ba3962;hb=811a099c10b876edcc1167a58cf80bf42bc5eb4c;hpb=9847261df894191f35b2917704fb21809f8609b7

diff --git a/t/basic.t b/t/basic.t
index e39799a..4166e2d 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -85,6 +85,7 @@ cmp_ok (total_size(\&LARGE), '>', 8192,
     my $a = [];
     my $b = \$a;
     # making a weakref upgrades the target to PVMG and adds magic
+    weaken $b;
     is(total_size($a), total_size([]),
        'Any intial reference is dereferenced and discarded');
 }