no_ending.t revision 7c478bd95313f5f23a4c958a745db2134aa03244
use Test::Builder;
BEGIN {
if( $ENV{PERL_CORE} ) {
chdir 't';
@INC = '../lib';
}
}
BEGIN {
my $t = Test::Builder->new;
$t->no_ending(1);
}
use Test::More tests => 3;
# Normally, Test::More would yell that we ran too few tests, but we
# supressed the ending diagnostics.
pass;
print "ok 2\n";
print "ok 3\n";