]> git.donarmstrong.com Git - lilypond.git/blob - lily/ligature-bracket-engraver.cc
(DECLARE_EVENT_SWALLOWER): ENTER_DESCRIPTION -> ADD_TRANSLATOR
[lilypond.git] / lily / ligature-bracket-engraver.cc
1 /*   
2   ligature-bracket-engraver.cc -- implement Ligature_bracket_engraver
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 2002--2004 Juergen Reuter <reuter@ipd.uka.de>
7   
8  */
9
10 #include "ligature-engraver.hh"
11 #include "note-column.hh"
12 #include "tuplet-bracket.hh"
13 #include "spanner.hh"
14
15 /*
16  * This engraver marks ligatures of any kind by just printing a
17  * horizontal square bracket on top of each ligature.  See class
18  * Ligature_engraver for more information on the interaction between
19  * this class and its superclass.
20  */
21 class Ligature_bracket_engraver : public Ligature_engraver
22 {
23 protected:
24   virtual Spanner *create_ligature_spanner ();
25   virtual void acknowledge_grob (Grob_info);
26 public:
27   TRANSLATOR_DECLARATIONS (Ligature_bracket_engraver);
28 };
29
30
31 Ligature_bracket_engraver::Ligature_bracket_engraver ()
32 {
33 }
34
35 Spanner *
36 Ligature_bracket_engraver::create_ligature_spanner ()
37 {
38   return make_spanner ("LigatureBracket", SCM_EOL);
39 }
40
41
42 void
43 Ligature_bracket_engraver::acknowledge_grob (Grob_info info)
44 {
45   if (current_ligature ())
46     {
47       if (Note_column::has_interface (info.grob_))
48         {
49           Tuplet_bracket::add_column (current_ligature (),
50                                       dynamic_cast<Item*> (info.grob_));
51         }
52       else Ligature_engraver::acknowledge_grob (info);
53     }
54 }
55
56 ADD_TRANSLATOR (Ligature_bracket_engraver,
57 /* descr */       "Handles Ligature_events by engraving Ligature brackets.",
58 /* creats*/       "TupletBracket",
59 /* accepts */     "ligature-event",
60 /* acks  */      "rest-interface note-column-interface",
61 /* reads */       "",
62 /* write */       "");