X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fengraver-group.cc;h=8a73400e73e9a730e60379b5c1db37ce6358dbc9;hb=c77189ccaa4e645850ad61779de7a4c8f3fdbc6f;hp=6271d93979b729b97fea32db94b7e96df56d5ba9;hpb=862601226f319d2395794fe1175e7f17485b8e19;p=lilypond.git diff --git a/lily/engraver-group.cc b/lily/engraver-group.cc index 6271d93979..8a73400e73 100644 --- a/lily/engraver-group.cc +++ b/lily/engraver-group.cc @@ -1,9 +1,20 @@ /* - engraver-group.cc -- implement Engraver_group + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1997--2010 Han-Wen Nienhuys - (c) 1997--2006 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" @@ -11,7 +22,6 @@ #include "engraver-group.hh" #include "grob.hh" #include "paper-score.hh" -#include "stream-event.hh" #include "translator-dispatch-list.hh" #include "warn.hh" @@ -21,10 +31,10 @@ Engraver_group::override (SCM sev) { Stream_event *ev = unsmob_stream_event (sev); - execute_general_pushpop_property (context (), - ev->get_property ("symbol"), - ev->get_property ("property-path"), - ev->get_property ("value")); + sloppy_general_pushpop_property (context (), + ev->get_property ("symbol"), + ev->get_property ("property-path"), + ev->get_property ("value")); } IMPLEMENT_LISTENER (Engraver_group, revert); @@ -33,10 +43,10 @@ Engraver_group::revert (SCM sev) { Stream_event *ev = unsmob_stream_event (sev); - execute_general_pushpop_property (context (), - ev->get_property ("symbol"), - ev->get_property ("property-path"), - SCM_UNDEFINED); + sloppy_general_pushpop_property (context (), + ev->get_property ("symbol"), + ev->get_property ("property-path"), + SCM_UNDEFINED); } void @@ -89,7 +99,7 @@ Engraver_group::acknowledge_grobs () else continue; - SCM acklist = scm_hashq_ref (acknowledge_hash_table_drul_[info.start_end()], + SCM acklist = scm_hashq_ref (acknowledge_hash_table_drul_[info.start_end ()], nm, SCM_BOOL_F); Engraver_dispatch_list *dispatch @@ -179,11 +189,18 @@ Engraver_group::Engraver_group () #include "translator.icc" ADD_TRANSLATOR_GROUP (Engraver_group, - /* doc */ "A group of engravers taken together", - /* create */ "", - /* accept */ "", - /* read */ "", - /* write */ ""); + /* doc */ + "A group of engravers taken together.", + + /* create */ + "", + + /* read */ + "", + + /* write */ + "" + ); void Engraver_group::derived_mark () const