ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/EV/EV.xs
(Generate patch)

Comparing EV/EV.xs (file contents):
Revision 1.181 by root, Tue Feb 18 16:49:07 2020 UTC vs.
Revision 1.183 by root, Wed Aug 16 16:03:37 2023 UTC

… …
26#else 26#else
27# define NDEBUG 1 27# define NDEBUG 1
28#endif 28#endif
29 29
30/* make sure we get a real assert, not perl's incompatible version */ 30/* make sure we get a real assert, not perl's incompatible version */
31#undef assert
31#include <assert.h> 32#include <assert.h>
32 33
33#define EV_STANDALONE 1 34#define EV_STANDALONE 1
34#define EV_PROTOTYPES 1 35#define EV_PROTOTYPES 1
35#define EV_USE_NANOSLEEP EV_USE_MONOTONIC 36#define EV_USE_NANOSLEEP EV_USE_MONOTONIC
… …
1269 1270
1270MODULE = EV PACKAGE = EV::Child PREFIX = ev_child_ 1271MODULE = EV PACKAGE = EV::Child PREFIX = ev_child_
1271 1272
1272#if EV_CHILD_ENABLE 1273#if EV_CHILD_ENABLE
1273 1274
1275void ev_child_reinit ()
1276 CODE:
1277 ev_signal_stop (evapi.default_loop, &childev);
1278 ev_signal_start (evapi.default_loop, &childev);
1279
1274void ev_child_start (ev_child *w) 1280void ev_child_start (ev_child *w)
1275 CODE: 1281 CODE:
1276 START (child, w); 1282 START (child, w);
1277 1283
1278void ev_child_stop (ev_child *w) 1284void ev_child_stop (ev_child *w)
… …
1324} 1330}
1325 1331
1326SV *path (ev_stat *w, SV *new_path = NO_INIT) 1332SV *path (ev_stat *w, SV *new_path = NO_INIT)
1327 CODE: 1333 CODE:
1328{ 1334{
1329 RETVAL = e_fh (w) ? e_fh (w) : &PL_sv_undef; 1335 RETVAL = e_fh (w) ? newSVsv (e_fh (w)) : &PL_sv_undef;
1330 1336
1331 if (items > 1) 1337 if (items > 1)
1332 { 1338 {
1333 sv_2mortal (RETVAL); 1339 sv_2mortal (e_fh (w));
1334 e_fh (w) = newSVsv (new_path); 1340 e_fh (w) = newSVsv (new_path);
1335 RESET (stat, w, (w, SvPVbyte_nolen (e_fh (w)), w->interval)); 1341 RESET (stat, w, (w, SvPVbyte_nolen (e_fh (w)), w->interval));
1336 } 1342 }
1337} 1343}
1338 OUTPUT: 1344 OUTPUT:

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines