1use strict; 2use warnings; 3use Test2::Tools::Tiny; 4 5use Test2::Hub::Interceptor; 6 7my $one = Test2::Hub::Interceptor->new(); 8 9ok($one->isa('Test2::Hub'), "inheritance");; 10 11my $e = exception { $one->terminate(55) }; 12ok($e->isa('Test2::Hub::Interceptor::Terminator'), "exception type"); 13like($$e, 'Label not found for "last T2_SUBTEST_WRAPPER"', "Could not find label"); 14 15done_testing; 16