lily/sequential-music.cc

   1
   2 #include "music-list.hh"
   3 #include "sequential-music-iterator.hh"
   4
   5 Sequential_music::Sequential_music (SCM head)
   6   : Music_sequence (head)
   7 {
   8   set_mus_property ("iterator-ctor",
   9                     Sequential_music_iterator::constructor_proc);
  10 }
  11 Sequential_music::Sequential_music ()
  12   : Music_sequence ()
  13 {
  14   set_mus_property ("iterator-ctor",
  15                     Sequential_music_iterator::constructor_proc);
  16 }
  17
  18
  19 Moment
  20 Sequential_music::length_mom () const
  21 {
  22   return Music_sequence::cumulative_length (get_mus_property ("elements"));
  23 }
  24 ADD_MUSIC (Sequential_music);
  25
  26 Moment
  27 Sequential_music::start_mom () const
  28 {
  29   return Music_sequence::first_start (get_mus_property ("elements"));
  30 }