]> git.donarmstrong.com Git - lilypond.git/blob - lily/simple-music-iterator.cc
release: 1.5.0
[lilypond.git] / lily / simple-music-iterator.cc
1 /*   
2   simple-music-iterator.cc --  implement Simple_music_iterator
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 2000--2001 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   
8  */
9
10 #include "simple-music-iterator.hh"
11 #include "music.hh"
12 #include "input.hh"
13
14 Simple_music_iterator::Simple_music_iterator ()
15   : Music_iterator ()
16 {
17   last_processed_mom_ = -1;
18 }
19
20 Simple_music_iterator::Simple_music_iterator (Simple_music_iterator const &src)
21   : Music_iterator (src)
22 {
23   last_processed_mom_ = src.last_processed_mom_;
24 }
25
26 bool
27 Simple_music_iterator::ok ()const
28 {
29   return last_processed_mom_ < music_length_mom ();
30 }
31
32 Moment
33 Simple_music_iterator::pending_moment ()const
34 {
35   if (last_processed_mom_ < Moment (0))
36     return Moment (0);
37   else
38     return music_length_mom ();
39 }
40
41 void
42 Simple_music_iterator::skip (Moment m)
43 {
44   /*
45     docme??!!
46    */
47   //  music_l_ = 0;
48   
49   last_processed_mom_ = m;
50 }
51
52 void
53 Simple_music_iterator::process (Moment m)
54 {
55   /*
56   don't do try_music (), since it would make the function useless for
57   base classes */
58
59   skip (m);
60 }
61
62 IMPLEMENT_CTOR_CALLBACK (Simple_music_iterator);