| … | |
… | |
| 29 | # define fd_mask Perl_fd_mask |
29 | # define fd_mask Perl_fd_mask |
| 30 | #endif |
30 | #endif |
| 31 | /* due to bugs in OS X we have to use libev/ explicitly here */ |
31 | /* due to bugs in OS X we have to use libev/ explicitly here */ |
| 32 | #include "libev/ev.c" |
32 | #include "libev/ev.c" |
| 33 | |
33 | |
| 34 | #ifndef _WIN32 |
34 | #if !defined(_WIN32) && !defined(_MINIX) |
| 35 | # include <pthread.h> |
35 | # include <pthread.h> |
| 36 | #endif |
36 | #endif |
| 37 | |
37 | |
| 38 | #define e_loop(w) INT2PTR (struct ev_loop *, SvIVX (((ev_watcher *)(w))->loop)) |
38 | #define e_loop(w) INT2PTR (struct ev_loop *, SvIVX (((ev_watcher *)(w))->loop)) |
| 39 | #define e_flags(w) ((ev_watcher *)(w))->e_flags |
39 | #define e_flags(w) ((ev_watcher *)(w))->e_flags |
| … | |
… | |
| 495 | evapi.invoke = ev_invoke; |
495 | evapi.invoke = ev_invoke; |
| 496 | |
496 | |
| 497 | sv_setiv (sv, (IV)&evapi); |
497 | sv_setiv (sv, (IV)&evapi); |
| 498 | SvREADONLY_on (sv); |
498 | SvREADONLY_on (sv); |
| 499 | } |
499 | } |
| 500 | #ifndef _WIN32 |
500 | #if !defined(_WIN32) && !defined(_MINIX) |
| 501 | pthread_atfork (0, 0, ev_default_fork); |
501 | pthread_atfork (0, 0, ev_default_fork); |
| 502 | #endif |
502 | #endif |
| 503 | } |
503 | } |
| 504 | |
504 | |
| 505 | SV *ev_default_loop (unsigned int flags = 0) |
505 | SV *ev_default_loop (unsigned int flags = 0) |
