use Test::More tests => 3;
ok(1, "Before");

BEGIN {
        package M;
        use TE;
        package main;
}
use TE;
use M;

exits_ok( sub {f()}, -2, "exits");
ok(1, "After");