Revert "Test that `use feature' doesn't leak a scalar during s///ee"
authorJosh ben Jore <jjore@cpan.org>
Mon, 20 Jul 2009 18:05:51 +0000 (11:05 -0700)
committerJosh ben Jore <jjore@cpan.org>
Mon, 20 Jul 2009 18:05:51 +0000 (11:05 -0700)
This reverts commit cda5e2ec34321ed347095f583f979be84943ec52 which
duplicated something already commited in
fa13de9435b2f7be1099b9202ae6e26021b00ba8.

MANIFEST
t/lib/feature/leak [deleted file]

index 6192dd0..9b2e198 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -4027,7 +4027,6 @@ t/lib/dprof/test8_v               Perl code profiler tests
 t/lib/dprof/V.pm               Perl code profiler tests
 t/lib/feature/bundle           Tests for feature bundles
 t/lib/feature/implicit         Tests for implicit loading of feature.pm
-t/lib/feature/leak             Tests for memory leaks
 t/lib/feature/nonesuch         Tests for enabling/disabling nonexistent feature
 t/lib/feature/say              Tests for enabling/disabling say feature
 t/lib/feature/switch           Tests for enabling/disabling switch feature
diff --git a/t/lib/feature/leak b/t/lib/feature/leak
deleted file mode 100644 (file)
index fbd35f0..0000000
+++ /dev/null
@@ -1,12 +0,0 @@
-Check that 'use feature' does not leak
-
-__END__
-# RT 63110 - Check that s///ee does not leak a hints variable
-use feature qw(:5.10);
-my $t;
-my $s = "a";
-$s =~ s/a/$t = \%^H;  qq( qq() );/ee;
-print Internals::SvREFCNT(%$t);
-
-EXPECT
-1