… | … | ||
---|---|---|---|
19 | BEGIN { | 19 | BEGIN { |
20 | $VERSION = '0.96'; | 20 | $VERSION = '0.96'; |
21 | 21 | ||
22 | use XSLoader; | 22 | use XSLoader; |
23 | XSLoader::load "CFPlus", $VERSION; | 23 | XSLoader::load "CFPlus", $VERSION; |
24 | } | ||
25 | |||
26 | BEGIN { | ||
27 | $SIG{__DIE__} = sub { | ||
28 | return if CFPlus::in_destruct; | ||
29 | #CFPlus::fatal $_[0];#d# | ||
30 | CFPlus::error Carp::longmess $_[0];#d# | ||
31 | die;#d# | ||
32 | }; | ||
33 | } | 24 | } |
34 | 25 | ||
35 | use utf8; | 26 | use utf8; |
36 | 27 | ||
37 | use AnyEvent (); | 28 | use AnyEvent (); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |