| … | |
… | |
| 62 | package EV; |
62 | package EV; |
| 63 | |
63 | |
| 64 | use strict; |
64 | use strict; |
| 65 | |
65 | |
| 66 | BEGIN { |
66 | BEGIN { |
| 67 | our $VERSION = '0.5'; |
67 | our $VERSION = '0.51'; |
| 68 | use XSLoader; |
68 | use XSLoader; |
| 69 | XSLoader::load "EV", $VERSION; |
69 | XSLoader::load "EV", $VERSION; |
| 70 | } |
70 | } |
| 71 | |
71 | |
| 72 | @EV::Io::ISA = |
72 | @EV::Io::ISA = |
| … | |
… | |
| 475 | |
475 | |
| 476 | our $DIED = sub { |
476 | our $DIED = sub { |
| 477 | warn "EV: error in callback (ignoring): $@"; |
477 | warn "EV: error in callback (ignoring): $@"; |
| 478 | }; |
478 | }; |
| 479 | |
479 | |
| 480 | init |
480 | default_loop |
| 481 | or die 'EV: cannot initialise libev backend. bad $ENV{LIBEV_METHODS}?'; |
481 | or die 'EV: cannot initialise libev backend. bad $ENV{LIBEV_METHODS}?'; |
| 482 | |
482 | |
| 483 | push @AnyEvent::REGISTRY, [EV => "EV::AnyEvent"]; |
483 | push @AnyEvent::REGISTRY, [EV => "EV::AnyEvent"]; |
| 484 | |
484 | |
| 485 | 1; |
485 | 1; |
