* VERSION (MY_PATCH_LEVEL): make 1.7.0

[lilypond.git] / lily / include / simple-music-iterator.hh

diff --git a/lily/include/simple-music-iterator.hh b/lily/include/simple-music-iterator.hh
index d03601a6dc8b7da09da2b8c2b9ba2061fe129df6..d154b144614e4a36c2bfe4d8237fe52d516a36d0 100644 (file)
--- a/lily/include/simple-music-iterator.hh
+++ b/lily/include/simple-music-iterator.hh
@@ -3,7 +3,7 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 2000--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
  */
 
 #ifndef SIMPLE_MUSIC_ITERATOR_HH
@@ -11,6 +11,11 @@
 
 #include "music-iterator.hh"
 
+/*
+  Iterator for atomic music objects: events are generated at the
+  beginning and at the end of the music.
+  
+ */
 class Simple_music_iterator : public Music_iterator
 {
 protected:
@@ -18,12 +23,13 @@ protected:
   Moment last_processed_mom_;
 public:
   VIRTUAL_COPY_CONS (Music_iterator);
-  static SCM constructor_cxx_function; 
+  DECLARE_SCHEME_CALLBACK(constructor, ()); 
   Simple_music_iterator ();
   Simple_music_iterator (Simple_music_iterator const &);
   virtual void process (Moment);
   virtual bool ok ()const;
   virtual Moment pending_moment ()const;
+
   virtual void skip (Moment);
 };