-void
-Score_engraver::forbid_breaks ()
-{
- if (command_column_)
- command_column_->set_property ("breakable", SCM_EOL);
-}
-
-void
-Score_engraver::acknowledge_grob (Grob_info gi)
-{
- if (Staff_spacing::has_interface (gi.grob_))
- {
- Pointer_group_interface::add_grob (command_column_,
- ly_symbol2scm ("spacing-wishes"),
- gi.grob_);
- }
- if (Note_spacing::has_interface (gi.grob_))
- {
- Pointer_group_interface::add_grob (musical_column_,
- ly_symbol2scm ("spacing-wishes"),
- gi.grob_);
- }
-}
-
-
-
-ENTER_DESCRIPTION (Score_engraver,
-/* descr */ "Top level engraver. Takes care of generating columns and the complete system (ie. System) "
-"\n\n "
-"This engraver decides whether a column is breakable. The default is "
-"that a column is always breakable. However, when every Bar_engraver "
-"that does not have a barline at a certain point will call "
-"Score_engraver::forbid_breaks to stop linebreaks. In practice, this "
-"means that you can make a breakpoint by creating a barline (assuming "
-"that there are no beams or notes that prevent a breakpoint.) "
-,
-/* creats*/ "System PaperColumn NonMusicalPaperColumn",
-/* accepts */ "break-event",
-/* acks */ "note-spacing-interface staff-spacing-interface",
-/* reads */ "currentMusicalColumn currentCommandColumn",
-/* write */ "");
+ADD_TRANSLATOR_GROUP (Score_engraver,
+ /* doc */ "Top level engraver. Takes care of generating columns and the complete system (ie. System) "
+ "\n\n "
+ "This engraver decides whether a column is breakable. The default is "
+ "that a column is always breakable. However, every Bar_engraver "
+ "that does not have a barline at a certain point will set "
+ "forbidBreaks to stop linebreaks. In practice, this "
+ "means that you can make a breakpoint by creating a barline (assuming "
+ "that there are no beams or notes that prevent a breakpoint.) ",
+ /* create */
+ "System ",
+
+ /* accept */
+ "break-event",
+
+ /* read */
+ "currentMusicalColumn "
+ "currentCommandColumn "
+ "verticallySpacedContexts",
+
+ /* write */
+ "");