- Moment now = now_mom ();
- SCM start_busy = get_property ("busyGrobs");
- SCM busy = start_busy;
- while (scm_is_pair (busy) && *unsmob_moment (scm_caar (busy)) == now)
- busy = scm_cdr (busy);
-
- vector_sort (started_now_, Grob_pq_entry::compare);