]> git.donarmstrong.com Git - lilypond.git/blob - lily/request-iterator.cc
release: 1.3.86
[lilypond.git] / lily / request-iterator.cc
1 /*   
2   request-iterator.cc --  implement Simple_music_iterator
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   
8  */
9 #include "request-iterator.hh"
10 #include "music.hh"
11 #include "input.hh"
12
13 void
14 Simple_music_iterator::do_process_and_next (Moment m)
15 {
16   if (first_b_)
17     {
18       bool g= try_music (music_l_);
19       if (!g)
20         music_l_->origin ()->warning (_f ("Junking music: `%s'", classname(music_l_)));
21
22       first_b_ = false;
23     }
24   Music_iterator::do_process_and_next (m);
25 }