view release on metacpan or  search on metacpan

Event.xs  view on Meta::CPAN

    else {
      RETVAL = newSViv(h->heap[0].deadline_ns);
    }
  OUTPUT:
    RETVAL

void
timer_heap_pop_expired(heap, now_ns)
    SV *heap
    IV now_ns
  PPCODE:
    le_timer_heap_t *h = le_timer_heap_from_sv(heap);
    while (h->size) {
      le_timer_drop_cancelled_roots(h);
      if (!h->size) break;
      if (h->heap[0].deadline_ns > now_ns) break;

      UV id = h->heap[0].id;
      IV deadline_ns = h->heap[0].deadline_ns;
      SV *cb = newSVsv(h->heap[0].cb);
      if (id < h->live_cap) h->live[id] = 0;