From: Dave Rolsky <autarch@urth.org>
Date: Sun, 19 Feb 2012 20:03:01 +0000 (-0600)
Subject: Make the immutable anon class leak test a TODO test
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1a58cce017660dfd0470b5bb7029529fd477db0d;p=gitmo%2FMoose.git

Make the immutable anon class leak test a TODO test

I'm pretty sure the leak comes from the constructor closing over the metaclass
object itself. Once this is gone, the test will pass.
---

diff --git a/t/bugs/memory_leaks.t b/t/bugs/memory_leaks.t
index d9ddc84..8ed9d77 100644
--- a/t/bugs/memory_leaks.t
+++ b/t/bugs/memory_leaks.t
@@ -68,13 +68,17 @@ no_leaks_ok(
     'anonymous role is leak-free'
 );
 
-no_leaks_ok(
-    sub {
-        my $meta = Moose::Meta::Class->create_anon_class;
-        $meta->make_immutable;
-    },
-    'making an anon class immutable is leak-free'
-);
+{
+    local $TODO
+        = 'Until we eliminate meta objects from being closed over by the immutabilized methods, this will leak';
+    no_leaks_ok(
+        sub {
+            my $meta = Moose::Meta::Class->create_anon_class;
+            $meta->make_immutable;
+        },
+        'making an anon class immutable is leak-free'
+    );
+}
 
 {
     my $meta3 = Moose::Meta::Class->create('MyClass3');