SCM
Chord_name::after_line_breaking (SCM smob)
{
- Item* me = unsmob_item (smob);
+ Item *me = unsmob_item (smob);
assert (me);
-
+
SCM s = me->get_property ("begin-of-line-visible");
if (to_boolean (s))
{
- if (Paper_column::get_rank (me->get_column ()) -
- me->get_system ()->spanned_rank_iv ()[LEFT] > 1)
+ if (Paper_column::get_rank (me->get_column ())
+ - me->get_system ()->spanned_rank_iv ()[LEFT] > 1)
me->suicide ();
}
return SCM_UNSPECIFIED;
}
ADD_INTERFACE (Chord_name, "chord-name-interface",
- "A chord name.",
- "begin-of-line-visible");
+ "A chord name.",
+ "begin-of-line-visible");