Searched refs:handler_traceback (Results 1 – 2 of 2) sorted by relevance
16 my $handler = \&handler_traceback;44 $handler = \&handler_traceback;82 sub handler_traceback { subroutine
31 is( $SIG{AFAKE}, \&sigtrap::handler_traceback, 'install normal handler' );35 is( $SIG{FAKE2}, \&sigtrap::handler_traceback, 'install traceback handler' );78 is( $SIG{FAKE}, \&sigtrap::handler_traceback, 'should set default handler' );