X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fproperty-iterator.hh;h=bd5f28c280119d2727e2a6ad5f29edb9c2275d75;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=f60632a9e8b584edadfc6858140916478dc6f892;hpb=bb36bac02a64770871780231ecc709cb18b20932;p=lilypond.git diff --git a/lily/include/property-iterator.hh b/lily/include/property-iterator.hh index f60632a9e8..bd5f28c280 100644 --- a/lily/include/property-iterator.hh +++ b/lily/include/property-iterator.hh @@ -3,23 +3,59 @@ source file of the GNU LilyPond music typesetter - (c) 1997--2000 Han-Wen Nienhuys + (c) 1997--2008 Han-Wen Nienhuys */ - #ifndef PROPERTY_ITERATOR_HH #define PROPERTY_ITERATOR_HH -#include "music-iterator.hh" +#include "simple-music-iterator.hh" + /** - Iterate a property. - */ -class Property_iterator : public Music_iterator + Iterate a property. +*/ +class Property_iterator : public Simple_music_iterator +{ +public: + DECLARE_SCHEME_CALLBACK (constructor, ()); + DECLARE_SCHEME_CALLBACK (once_finalization, (SCM, SCM)); + DECLARE_CLASSNAME(Property_iterator); + +protected: + virtual void do_quit (); + virtual void process (Moment); +}; + +/** + Iterate a property. +*/ +class Property_unset_iterator : public Simple_music_iterator +{ +public: + DECLARE_SCHEME_CALLBACK (constructor, ()); + DECLARE_CLASSNAME(Property_unset_iterator); +protected: + virtual void process (Moment); +}; + +class Push_property_iterator : public Simple_music_iterator +{ +public: + DECLARE_SCHEME_CALLBACK (constructor, ()); + DECLARE_SCHEME_CALLBACK (once_finalization, (SCM, SCM)); + DECLARE_CLASSNAME(Push_property_iterator); +protected: + virtual void process (Moment); + virtual void do_quit (); +}; + +class Pop_property_iterator : public Simple_music_iterator { public: - // construction + DECLARE_SCHEME_CALLBACK (constructor, ()); + DECLARE_CLASSNAME(Pop_property_iterator); protected: - virtual void do_process_and_next (Moment); + virtual void process (Moment); }; #endif // PROPERTY_ITERATOR_HH