- for (SCM t = g->get_grob_property ("elements");
- gh_pair_p (t); t = gh_cdr (t))
- max_corr = max_corr >? next_note_correction (me, unsmob_grob (gh_car (t)), bar_size);
+ for (SCM t = g->get_property ("elements");
+ scm_is_pair (t); t = scm_cdr (t))
+ max_corr = max_corr >? next_note_correction (me, unsmob_grob (scm_car (t)), bar_size);