X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fsequential-music-iterator.hh;h=b327fcfa96622331b17aad9ab8a84a5477d1ce30;hb=1036b837e5c947284f1b64029b912793edab3dad;hp=17e7aede8bab9b8e2302ad9df18b5eef6858f921;hpb=6798fd9b3d52cbed28b24dbac067bff9af406230;p=lilypond.git

diff --git a/lily/include/sequential-music-iterator.hh b/lily/include/sequential-music-iterator.hh
index 17e7aede8b..b327fcfa96 100644
--- a/lily/include/sequential-music-iterator.hh
+++ b/lily/include/sequential-music-iterator.hh
@@ -3,48 +3,26 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c)  1997--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
 #ifndef SEQUENTIAL_MUSIC_ITERATOR_HH
 #define SEQUENTIAL_MUSIC_ITERATOR_HH
 
-#include "music-iterator.hh"
+#include "sequential-iterator.hh"
 
 /** Sequential_music iteration: walk each element in turn, and
   construct an iterator for every element.
   
  */
-class Sequential_music_iterator :  public Music_iterator
+class Sequential_music_iterator :  public Sequential_iterator
 {
 public:
-  Sequential_music_iterator ();
-  virtual ~Sequential_music_iterator ();
-
-  virtual void construct_children ();
-  virtual Moment next_moment () const;
-  virtual bool ok () const;
-  virtual Music* get_music ();
-  virtual bool next ();
-
-protected:
-  virtual void do_print() const;
-  virtual void do_process_and_next (Moment);
-  virtual Music_iterator *try_music_in_children (Music *) const;
-
-
+  VIRTUAL_COPY_CONS (Music_iterator);
+  DECLARE_SCHEME_CALLBACK(constructor, ());
 private:
-  Moment here_mom_;
-
-  SCM cursor_;
-  Music_iterator * iter_p_;
-
-  /*
-    perhaps these can be virtual and protected iso. private?  
-   */
-  void start_next_element();
-  void leave_element();
-  void set_sequential_music_translator();
+  virtual SCM get_music_list()const;
+  virtual void descend_to_child ();
 };
 
 #endif // SEQUENTIAL_MUSIC_ITERATOR_HH