* lily/include/translator.icc (ADD_ACKNOWLEDGER): new macro.

[lilypond.git] / lily / include / property-iterator.hh

diff --git a/lily/include/property-iterator.hh b/lily/include/property-iterator.hh
index ea429a36a4aba307108019ce746ebab0d9df14a3..df24350c05b7e360c255e4f09014ed7805d8ce51 100644 (file)
--- a/lily/include/property-iterator.hh
+++ b/lily/include/property-iterator.hh
@@ -3,23 +3,55 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
-
 #ifndef PROPERTY_ITERATOR_HH
 #define PROPERTY_ITERATOR_HH
 
-#include "music-iterator.hh"
+#include "simple-music-iterator.hh"
+
+/**
+   Iterate a property.
+*/
+class Property_iterator : public Simple_music_iterator
+{
+public:
+  DECLARE_SCHEME_CALLBACK (constructor, ());
+  DECLARE_SCHEME_CALLBACK (once_finalization, (SCM, SCM));
+
+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, ());
+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));
+protected:
+  virtual void process (Moment);
+  virtual void do_quit ();
+};
 
-class Property_iterator : public Music_iterator
+class Pop_property_iterator : public Simple_music_iterator
 {
-  Translation_property *property_l() const;
-  
 public:
-  DECLARE_MY_RUNTIME_TYPEINFO;
+  DECLARE_SCHEME_CALLBACK (constructor, ());
 protected:
-  virtual void do_process_and_next (Moment);
+  virtual void process (Moment);
 };
 
 #endif // PROPERTY_ITERATOR_HH