The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

ETJ / Graph-0.9735 / t / 02_trap.t 

            

              
1
2
3
4
5
6
7

              
use strict; use warnings;
use Test::More tests => 2;
use Graph;
isnt($SIG{__DIE__},  \&Graph::__carp_confess, '$SIG{__DIE__}' );
isnt($SIG{__WARN__}, \&Graph::__carp_confess, '$SIG{__WARN__}');