1#!/usr/bin/perl -w
2# HARNESS-NO-STREAM
3# HARNESS-NO-PRELOAD
4
5# Test::More should not print anything when Perl is only doing
6# a compile as with the -c flag or B::Deparse or perlcc.
7
8# HARNESS_ACTIVE=1 was causing an error with -c
9{
10    local $ENV{HARNESS_ACTIVE} = 1;
11    local $^C = 1;
12
13    require Test::More;
14    Test::More->import(tests => 1);
15
16    fail("This should not show up");
17}
18
19Test::More->builder->no_ending(1);
20
21print "1..1\n";
22print "ok 1\n";
23
24