/*
- music-list.cc -- implement Music_list,
+ music-list.cc -- implement Music_list, Chord, Voice
source file of the GNU LilyPond music typesetter
#include "music.hh"
#include "debug.hh"
+#include "music-list.hh"
Music_list::Music_list(Music_list const&s)
{
+ multi_level_i_ = s.multi_level_i_;
for (iter(s.music_p_list_.top(), i); i.ok(); i++)
add(i->clone());
}
-
IMPLEMENT_STATIC_NAME(Music_list);
+IMPLEMENT_STATIC_NAME(Chord);
+IMPLEMENT_STATIC_NAME(Voice);
+IMPLEMENT_IS_TYPE_B1(Music_list, Music);
+IMPLEMENT_IS_TYPE_B1(Voice,Music_list);
+IMPLEMENT_IS_TYPE_B1(Chord,Music_list);
+MInterval
+Chord::time_int()const
+{
+ MInterval m;
+ for (iter(music_p_list_.top(), i); i.ok(); i++)
+ m.unite(i->time_int());
+ return m;
+}
void
-Music_list::add(Music*mus_p)
+Chord::translate(Moment m)
{
- music_p_list_.bottom().add(mus_p);
+ for (iter(music_p_list_.top(), i); i.ok(); i++)
+ i->translate(m);
}
-void
-Music_list::transpose(Melodic_req const*m)
+Chord::Chord()
{
- for (iter(music_p_list_.top(), i); i.ok(); i++)
- i->transpose(m);
+
}
-void
-Music_list::do_print() const
+Voice::Voice()
{
- for (iter(music_p_list_.top(), i); i.ok(); i++)
- i->print();
+ offset_mom_ =0;
}
-IMPLEMENT_STATIC_NAME(Chord);
+MInterval
+Voice::time_int() const
+{
+ Moment last=0;
+ for (iter(music_p_list_.top(), i); i.ok(); i++)
+ last += i->time_int().length();
+ return offset_mom_ + MInterval(0,last);
+}
void
-Chord::translate(Moment dt)
+Voice::translate(Moment dt)
{
- for (iter(music_p_list_.top(), i); i.ok(); i++)
- i->translate(dt);
+ offset_mom_ += dt;
}
-MInterval
-Chord::time_int()const
+
+Music_list::Music_list()
{
- MInterval m;
- for (iter(music_p_list_.top(), i); i.ok(); i++)
- m.unite(i->time_int());
- return m;
+ multi_level_i_ = 0;
}
-MInterval
-MVoice::time_int() const
+void
+Music_list::add(Music*m_p)
{
- Moment last=0;
- for (iter(music_p_list_.top(), i); i.ok(); i++)
- last += i->time_int().length();
- return MInterval (0,last);
+ if (!m_p)
+ return;
+
+ m_p->parent_music_l_ = this;
+ music_p_list_.bottom().add(m_p);
}
void
-MVoice::translate(Moment dt)
+Music_list::transpose(Melodic_req const*rq)
{
- for (iter(music_p_list_.top(), i); i.ok(); i++)
- i->translate(dt);
+ for (iter(music_p_list_.top(),i); i.ok(); i++)
+ i->transpose(rq);
}
-IMPLEMENT_STATIC_NAME(MVoice);
+void
+Music_list::do_print()const
+{
+#ifndef NPRINT
+ for (iter(music_p_list_.top(),i); i.ok(); i++)
+ i->print();
+#endif
+}
+
+IMPLEMENT_IS_TYPE_B1(Voice_element, Chord);
+IMPLEMENT_STATIC_NAME(Voice_element);
+
+Voice_element::Voice_element()
+{
+ multi_level_i_ =0;
+}