apparently we're acting more like the pp version here now/:

diff --git a/xt/author/leaks-debug.t b/xt/author/leaks-debug.t
index 0b7963f..420356b 100644 (file)
--- a/xt/author/leaks-debug.t
+++ b/xt/author/leaks-debug.t
@@ -73,9 +73,7 @@ use Symbol;
     no_leaks_ok {
         $foo->add_symbol('&code_init' => sub { "foo" });
     } "add_symbol code doesn't leak";
-    { local $TODO = $Package::Stash::IMPLEMENTATION eq 'PP'
-        ? "the pure perl implementation leaks here somehow"
-        : undef;
+    { local $TODO = "the pure perl implementation leaks here somehow";
     no_leaks_ok {
         $foo->add_symbol('io_init' => Symbol::geniosym);
     } "add_symbol io doesn't leak";

diff --git a/xt/author/leaks.t b/xt/author/leaks.t
index 767b4f1..fee9b57 100644 (file)
--- a/xt/author/leaks.t
+++ b/xt/author/leaks.t
@@ -71,9 +71,7 @@ use Symbol;
     no_leaks_ok {
         $foo->add_symbol('&code_init' => sub { "foo" });
     } "add_symbol code doesn't leak";
-    { local $TODO = $Package::Stash::IMPLEMENTATION eq 'PP'
-        ? "the pure perl implementation leaks here somehow"
-        : undef;
+    { local $TODO = "this leaks here somehow";
     no_leaks_ok {
         $foo->add_symbol('io_init' => Symbol::geniosym);
     } "add_symbol io doesn't leak";