This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Retract #20548 and #20465.
[perl5.git] / lib / Test / Simple / t / More.t
index abd1e80..df8c5fe 100644 (file)
@@ -7,7 +7,7 @@ BEGIN {
     }
 }
 
-use Test::More tests => 42;
+use Test::More tests => 41;
 
 # Make sure we don't mess with $@ or $!.  Test at bottom.
 my $Err   = "this should not be touched";
@@ -69,9 +69,6 @@ ok( eq_hash({ foo => 42, bar => 23 }, {bar => 23, foo => 42}),
 ok( eq_set([qw(this that whatever)], [qw(that whatever this)]),
     'eq_set with simple sets' );
 
-eq_array([[]], [{}]);
-is(scalar @Test::More::Data_Stack, 0, "data stack empty");
-
 my @complex_array1 = (
                       [qw(this that whatever)],
                       {foo => 23, bar => 42},