]> git.donarmstrong.com Git - lilypond.git/blob - lily/property-iterator.cc
release: 1.1.6
[lilypond.git] / lily / property-iterator.cc
1 /*
2   property-iterator.cc -- implement Property_iterator
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "property-iterator.hh"
10 #include "translation-property.hh"
11 #include "translator-group.hh"
12
13 void
14 Property_iterator::do_process_and_next (Moment m)
15 {
16   if (property_l()->var_str_.length_i ())
17     report_to_l ()->set_property (property_l()->var_str_, property_l()->value_);
18   Music_iterator::do_process_and_next (m);
19 }
20
21
22
23 Translation_property*
24 Property_iterator::property_l () const
25 {
26   return (Translation_property*) music_l_;
27 }