]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/dynamic-engraver.cc
* buildscripts/analyse-cxx-log.py: new file. Read compile log to
[lilypond.git] / lily / dynamic-engraver.cc
index c3370d014ddff9ee414089713220c5da94e261ff..5f5559110a4e92ca5bf90305b9e0c432f112ba55 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1997--2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "axis-group-interface.hh"
@@ -61,6 +61,7 @@ class Dynamic_engraver : public Engraver
 
   TRANSLATOR_DECLARATIONS (Dynamic_engraver);
   DECLARE_ACKNOWLEDGER (script);
+  DECLARE_ACKNOWLEDGER (stem_tremolo);
   DECLARE_ACKNOWLEDGER (note_column);
   DECLARE_ACKNOWLEDGER (slur);
 
@@ -214,7 +215,7 @@ Dynamic_engraver::process_music ()
          else if (start_type == "CrescendoEvent")
            start_type = "crescendo";
 
-         SCM s = get_property ((start_type + "Spanner").to_str0 ());
+         SCM s = get_property ((start_type + "Spanner").c_str ());
          if (!scm_is_symbol (s) || s == ly_symbol2scm ("hairpin"))
            {
              cresc_ = make_spanner ("Hairpin", accepted_spanevents_drul_[START]->self_scm ());
@@ -243,8 +244,8 @@ Dynamic_engraver::process_music ()
              cresc_ = make_spanner ("DynamicTextSpanner", accepted_spanevents_drul_[START]->self_scm ());
              cresc_->set_property ("style", s);
              context ()->set_property ((start_type
-                                        + "Spanner").to_str0 (), SCM_EOL);
-             s = get_property ((start_type + "Text").to_str0 ());
+                                        + "Spanner").c_str (), SCM_EOL);
+             s = get_property ((start_type + "Text").c_str ());
              /*
                FIXME: use get_markup () to check type.
              */
@@ -252,7 +253,7 @@ Dynamic_engraver::process_music ()
                {
                  cresc_->set_property ("edge-text",
                                        scm_cons (s, scm_makfrom0str ("")));
-                 context ()->set_property ((start_type + "Text").to_str0 (),
+                 context ()->set_property ((start_type + "Text").c_str (),
                                            SCM_EOL);
                }
            }
@@ -370,6 +371,15 @@ Dynamic_engraver::typeset_all ()
     }
 }
 
+
+void
+Dynamic_engraver::acknowledge_stem_tremolo (Grob_info info)
+{
+  if (line_spanner_)
+    Side_position_interface::add_support (line_spanner_, info.grob ());
+}
+
+
 void
 Dynamic_engraver::acknowledge_slur (Grob_info info)
 {
@@ -377,6 +387,7 @@ Dynamic_engraver::acknowledge_slur (Grob_info info)
     Side_position_interface::add_support (line_spanner_, info.grob ());
 }
 
+
 void
 Dynamic_engraver::acknowledge_note_column (Grob_info info)
 {
@@ -437,6 +448,7 @@ Dynamic_engraver::acknowledge_script (Grob_info info)
 ADD_ACKNOWLEDGER (Dynamic_engraver, script);
 ADD_ACKNOWLEDGER (Dynamic_engraver, note_column);
 ADD_ACKNOWLEDGER (Dynamic_engraver, slur);
+ADD_ACKNOWLEDGER (Dynamic_engraver, stem_tremolo);
 
 ADD_TRANSLATOR (Dynamic_engraver,
                /* doc */