X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fengraver.hh;h=cecc42ce5e8010a4b6550afb95221a5b387c33ad;hb=5d84bfad4626892bcffd05adcced53c8a2329047;hp=f0dce7d6c721e989d0184b37abf4b8155564e702;hpb=7e72a1e50e94a7f9738d62599de79fe7745f600c;p=lilypond.git diff --git a/lily/include/engraver.hh b/lily/include/engraver.hh index f0dce7d6c7..cecc42ce5e 100644 --- a/lily/include/engraver.hh +++ b/lily/include/engraver.hh @@ -1,71 +1,92 @@ /* - engraver.hh -- declare Engraver + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1996--2015 Han-Wen Nienhuys - (c) 1996--2004 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 . +*/ #ifndef ENGRAVER_HH #define ENGRAVER_HH -#include "lily-proto.hh" -#include "array.hh" -#include "event.hh" +#include "callback.hh" +#include "grob.hh" #include "grob-info.hh" #include "translator.hh" - /** - a struct which processes events, and creates the #Grob#s. - It may use derived classes. - */ -class Engraver : public virtual Translator { - - friend class Engraver_group_engraver; + a struct which processes events, and creates the #Grob#s. + It may use derived classes. +*/ +class Engraver : public Translator +{ + Grob *internal_make_grob (SCM sym, SCM cause, + char const *f, int l, char const *fun); + friend SCM ly_engraver_make_grob (SCM, SCM, SCM); + friend class Engraver_group; protected: - /* - Call this when you're finished with ELEM_P. - */ - virtual void typeset_grob (Grob*elem); /* take note of item/spanner put item in spanner. Adjust local key; etc. Default: ignore the info - */ + */ virtual void acknowledge_grob (Grob_info) {} + virtual void announce_grob (Grob_info, Context *reroute_context = 0); + virtual void announce_end_grob (Grob_info, Context *reroute_context = 0); + Engraver_group *get_daddy_engraver () const; + +public: + using Translator::trampoline; + template + static SCM trampoline (SCM target, SCM grob, SCM source_engraver) + { + T *t = LY_ASSERT_SMOB (T, target, 1); + Grob *g = LY_ASSERT_SMOB (Grob, grob, 2); + Engraver *e = LY_ASSERT_SMOB (Engraver, source_engraver, 3); + + (t->*callback) (Grob_info (e, g)); + return SCM_UNSPECIFIED; + } - /** Do things with stuff found in acknowledge_grob. Ugh. Should - be looped with acknowledge_grob. - - */ - virtual void process_acknowledged_grobs () {} /** - Announce element. Default: pass on to daddy. Utility - */ - virtual void announce_grob (Grob*, SCM cause); - virtual void announce_grob (Grob_info); - virtual void process_music (); + Announce element. Default: pass on to daddy. Utility + */ + void announce_grob (Grob *, SCM cause); + void announce_end_grob (Grob *, SCM cause); - Score_engraver * top_engraver () const; + Grob_info make_grob_info (Grob *, SCM cause); - Item * internal_make_item (SCM); - Spanner * internal_make_spanner (SCM); + Item *internal_make_item (SCM sym, SCM cause, + char const *f, int l, char const *fun); + Spanner *internal_make_spanner (SCM sym, SCM cause, + char const *f, int l, char const *fun); + Paper_column *internal_make_column (SCM sym, + char const *f, int l, char const *fun); -public: - Engraver_group_engraver * get_daddy_grav () const; /** - override other ctor - */ - TRANSLATOR_DECLARATIONS(Engraver); + override other ctor + */ + DECLARE_CLASSNAME (Engraver); + DECLARE_TRANSLATOR_CALLBACKS (Engraver); + Engraver (Context *); }; -#define make_item(x) internal_make_item (ly_symbol2scm (x)) -#define make_spanner(x) internal_make_spanner (ly_symbol2scm (x)) - +#define make_item(x, cause) internal_make_item (ly_symbol2scm (x), cause, __FILE__, __LINE__, __FUNCTION__) +#define make_spanner(x, cause) internal_make_spanner (ly_symbol2scm (x), cause, __FILE__, __LINE__, __FUNCTION__) +#define make_paper_column(x) internal_make_column (ly_symbol2scm (x), __FILE__, __LINE__, __FUNCTION__) +bool ly_is_grob_cause (SCM obj); #endif // ENGRAVER_HH -