- stem_p_ = new Stem;
- Staff_symbol_referencer_interface st(stem_p_);
- st.set_interface ();
-
- stem_p_->set_elt_property ("duration-log", gh_int2scm (duration_log));
-
- if (abbrev_req_l_)
- {
- /*
- suggests typing of:
- c8:16 c: c: c:
- hmm, which isn't so bad?
- */
- int t = abbrev_req_l_->type_i_;
- if (!t)
- t = default_abbrev_i_;
- else
- default_abbrev_i_ = t;
-
- if (t)
- {
- abbrev_p_ = new Stem_tremolo;
- announce_element (Score_element_info (abbrev_p_, abbrev_req_l_));
- abbrev_p_->abbrev_flags_i_ =intlog2 (t) - (duration_log>? 2);
- }
- }
-
- // must give the request, to preserve the rhythmic info.
- announce_element (Score_element_info (stem_p_, r));