Reinstate weaken(), inadvertently removed by 8c394e1251fdfe38.
[p5sagit/Devel-Size.git] / t / basic.t
index e39799a..4166e2d 100644 (file)
--- 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');
 }