| … | |
… | |
| 167 | PUSHs (sv_self); |
167 | PUSHs (sv_self); |
| 168 | PUSHs (sv_events); |
168 | PUSHs (sv_events); |
| 169 | |
169 | |
| 170 | PUTBACK; |
170 | PUTBACK; |
| 171 | call_sv (w->cb_sv, G_DISCARD | G_VOID | G_EVAL); |
171 | call_sv (w->cb_sv, G_DISCARD | G_VOID | G_EVAL); |
| 172 | SP = PL_stack_base + mark; PUTBACK; |
|
|
| 173 | |
172 | |
| 174 | SvREFCNT_dec (sv_self); |
173 | SvREFCNT_dec (sv_self); |
| 175 | SvREFCNT_dec (sv_status); |
174 | SvREFCNT_dec (sv_status); |
| 176 | |
175 | |
| 177 | if (sv_events_cache) |
176 | if (sv_events_cache) |
| … | |
… | |
| 182 | if (SvTRUE (ERRSV)) |
181 | if (SvTRUE (ERRSV)) |
| 183 | { |
182 | { |
| 184 | PUSHMARK (SP); |
183 | PUSHMARK (SP); |
| 185 | PUTBACK; |
184 | PUTBACK; |
| 186 | call_sv (get_sv ("EV::DIED", 1), G_DISCARD | G_VOID | G_EVAL | G_KEEPERR); |
185 | call_sv (get_sv ("EV::DIED", 1), G_DISCARD | G_VOID | G_EVAL | G_KEEPERR); |
| 187 | SP = PL_stack_base + mark; PUTBACK; |
|
|
| 188 | } |
186 | } |
|
|
187 | |
|
|
188 | SP = PL_stack_base + mark; |
|
|
189 | PUTBACK; |
| 189 | } |
190 | } |
| 190 | |
191 | |
| 191 | static ev_tstamp |
192 | static ev_tstamp |
| 192 | e_periodic_cb (struct ev_periodic *w, ev_tstamp now) |
193 | e_periodic_cb (struct ev_periodic *w, ev_tstamp now) |
| 193 | { |
194 | { |
