- Real max_corr =0.0;
- for (SCM s = me->get_grob_property ("right-items");
- gh_pair_p (s); s = gh_cdr (s))
- {
- Grob * g = unsmob_grob (gh_car (s));
- max_corr = max_corr >? next_note_correction (me, g, bar_size);
- 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);
-
- }
- return max_corr;
-}
-
-/*
- Try to find the break-aligned symbol in SEPARATION_ITEM that is
- sticking out at direction D. The x size is put in LAST_EXT
-*/
-Grob*
-Staff_spacing::extremal_break_aligned_grob (Grob *separation_item, Direction d,
- Interval * last_ext)
-{
- Grob *left_col = dynamic_cast<Item*> (separation_item)->get_column ();
- last_ext->set_empty ();
- Grob *last_grob = 0;
- for (SCM s = separation_item->get_grob_property ("elements");
- gh_pair_p (s); s = gh_cdr (s))
- {
- Grob * break_item = unsmob_grob (gh_car (s));
-
- if (!gh_symbol_p (break_item->get_grob_property ("break-align-symbol")))
- continue;