(c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
*/
+#include "musicalrequest.hh"
#include "stembeamreg.hh"
#include "beam.hh"
#include "stem.hh"
#include "complexwalker.hh"
#include "complexstaff.hh"
#include "debug.hh"
-
+#include "grouping.hh"
Stem_beam_register::Stem_beam_register(Complex_walker*w)
:Request_register(w)
{
if ( req_l->stem() ) {
if (current_grouping && !current_grouping->child_fit_query(
- walk_l_->col()->tdescription_->whole_in_measure))
+ walk_l_->time_.whole_in_measure_))
return false;
if (stem_req_l_ && Stem_req::compare(*stem_req_l_, *req_l->stem()))
t->set_support(beam_p_);
t->spec.align_i_ = 0;
t->spec.text_str_ = beam_req_l_->nplet;
+ t->spec.style_str_="italic";
typeset_element(t);
}
stem_p_ = new Stem(4);
if (current_grouping)
current_grouping->add_child(
- walk_l_->col()->tdescription_->whole_in_measure,
+ walk_l_->time_.whole_in_measure_,
stem_req_l_->duration());
stem_p_->flag = stem_req_l_->balltype;
if (beam_p_) {
if (stem_req_l_->balltype<= 4)
warning( "stem doesn't fit in Beam",
- stem_req_l_->defined_ch_c_l_m);
+ stem_req_l_->defined_ch_c_l_);
else
beam_p_->add(stem_p_);
stem_p_->print_flag = false;
stem_p_ = 0;
}
if (beam_p_ && end_beam_b_) {
- walk_l_->default_grouping.extend(current_grouping->interval());
- beam_p_->set_grouping(walk_l_->default_grouping, *current_grouping);
+ walk_l_->default_grouping->extend(current_grouping->interval());
+ beam_p_->set_grouping(*walk_l_->default_grouping, *current_grouping);
typeset_element(beam_p_);
delete current_grouping;
current_grouping = 0;
Stem_beam_register::~Stem_beam_register()
{
if (beam_p_)
- warning("unterminated beam", start_req_l_->defined_ch_c_l_m);
+ warning("unterminated beam", start_req_l_->defined_ch_c_l_);
}
void