X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fforbid-break-engraver.cc;h=db0e254739c3cc5d7cee1a1eecaa1ada39adcb68;hb=155b705d1bedf668aace5dbe84e65065cd4c5bc0;hp=709f5e87d1897e6a6428e7383e3575dd894b7d26;hpb=e09265d8e9ad94714076ca91e63eab5c55679286;p=lilypond.git diff --git a/lily/forbid-break-engraver.cc b/lily/forbid-break-engraver.cc index 709f5e87d1..db0e254739 100644 --- a/lily/forbid-break-engraver.cc +++ b/lily/forbid-break-engraver.cc @@ -1,16 +1,26 @@ /* - forbid-break-engraver.cc -- implement Forbid_line_break_engraver + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 2002--_2005 Han-Wen Nienhuys - (c) 2002--_2005 Han-Wen Nienhuys + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . */ #include "context.hh" #include "duration.hh" #include "engraver.hh" #include "grob.hh" #include "input.hh" -#include "moment.hh" #include "pitch.hh" #include "rhythmic-head.hh" @@ -36,12 +46,12 @@ Forbid_line_break_engraver::start_translation_timestep () SCM busy = get_property ("busyGrobs"); Moment now = now_mom (); - while (scm_is_pair (busy) && unsmob_moment (scm_caar (busy))->main_part_ == now.main_part_) + while (scm_is_pair (busy) && unsmob (scm_caar (busy))->main_part_ == now.main_part_) busy = scm_cdr (busy); while (scm_is_pair (busy)) { - Grob *g = unsmob_grob (scm_cdar (busy)); + Grob *g = unsmob (scm_cdar (busy)); if (g->internal_has_interface (ly_symbol2scm ("rhythmic-grob-interface"))) context ()->get_score_context ()->set_property ("forbidBreak", SCM_BOOL_T); busy = scm_cdr (busy); @@ -49,9 +59,16 @@ Forbid_line_break_engraver::start_translation_timestep () } ADD_TRANSLATOR (Forbid_line_break_engraver, - /* doc */ "Forbid line breaks when note heads " - "are still playing at some point.", - /* create */ "", - /* accept */ "", - /* read */ "busyGrobs", - /* write */ "forbidBreak"); + /* doc */ + "Forbid line breaks when note heads are still playing at some" + " point.", + + /* create */ + "", + + /* read */ + "busyGrobs ", + + /* write */ + "forbidBreak " + );