… | |
… | |
60 | package EV; |
60 | package EV; |
61 | |
61 | |
62 | use strict; |
62 | use strict; |
63 | |
63 | |
64 | BEGIN { |
64 | BEGIN { |
65 | our $VERSION = '0.1'; |
65 | our $VERSION = '0.5'; |
66 | use XSLoader; |
66 | use XSLoader; |
67 | XSLoader::load "EV", $VERSION; |
67 | XSLoader::load "EV", $VERSION; |
68 | } |
68 | } |
69 | |
69 | |
70 | @EV::Io::ISA = |
70 | @EV::Io::ISA = |
… | |
… | |
464 | |
464 | |
465 | our $DIED = sub { |
465 | our $DIED = sub { |
466 | warn "EV: error in callback (ignoring): $@"; |
466 | warn "EV: error in callback (ignoring): $@"; |
467 | }; |
467 | }; |
468 | |
468 | |
469 | init; |
469 | init |
|
|
470 | or die 'EV: cannot initialise libev backend. bad $ENV{LIBEV_METHODS}?'; |
470 | |
471 | |
471 | push @AnyEvent::REGISTRY, [EV => "EV::AnyEvent"]; |
472 | push @AnyEvent::REGISTRY, [EV => "EV::AnyEvent"]; |
472 | |
473 | |
473 | 1; |
474 | 1; |
474 | |
475 | |