#include "dimensions.hh"
#include "directional-element-interface.hh"
#include "engraver.hh"
-#include "event.hh"
-#include "group-interface.hh"
#include "hairpin.hh"
#include "interval.hh"
-#include "item.hh"
-#include "slur.hh"
#include "note-column.hh"
#include "paper-column.hh"
#include "script-interface.hh"
{
Item *script_;
Spanner *line_spanner_;
- Spanner *slur_;
Spanner *cresc_;
Spanner *finished_line_spanner_;
Dynamic_engraver::Dynamic_engraver ()
{
script_ = 0;
- slur_ = 0;
finished_cresc_ = 0;
line_spanner_ = 0;
finished_line_spanner_ = 0;
current_cresc_ev_ = 0;
- cresc_ =0;
+ cresc_ = 0;
script_ev_ = 0;
accepted_spanreqs_drul_[START] = 0;
add_bound_item (finished_line_spanner_,
finished_cresc_->get_bound (RIGHT));
}
- finished_cresc_ =0;
+ finished_cresc_ = 0;
}
script_ = 0;
{
SCM head = scm_last_pair (info.grob_->get_property ("note-heads"));
if (scm_is_pair (head))
- script_->set_parent (unsmob_grob (ly_car (head)), X_AXIS);
+ script_->set_parent (unsmob_grob (scm_car (head)), X_AXIS);
}
< scm_to_int (script_->get_property ("script-priority")))
Side_position_interface::add_support (line_spanner_, info.grob_);
}
- else if (Slur::has_interface (info.grob_))
- slur_ = dynamic_cast<Spanner*> (info.grob_);
}
-ENTER_DESCRIPTION (Dynamic_engraver,
+ADD_TRANSLATOR (Dynamic_engraver,
/* descr */
"This engraver creates hairpins, dynamic texts, and their vertical\n"
"alignments. The symbols are collected onto a DynamicLineSpanner grob\n"
/* creats*/ "DynamicLineSpanner DynamicText Hairpin TextSpanner",
/* accepts */ "absolute-dynamic-event crescendo-event decrescendo-event",
-/* acks */ "note-column-interface script-interface slur-interface",
+/* acks */ "note-column-interface script-interface",
/* reads */ "",
/* write */ "");