* lily/parser.yy (command_element): move clef stuff into Scheme.

[lilypond.git] / lily / simultaneous-music.cc

diff --git a/lily/simultaneous-music.cc b/lily/simultaneous-music.cc
index 85a3b8136fd8de2222f4454b13bd9008004289d9..f5930cdaab0bc1ac1334b249a5e5da02299d78e3 100644 (file)
--- a/lily/simultaneous-music.cc
+++ b/lily/simultaneous-music.cc
@@ -5,7 +5,7 @@
 #include "music-list.hh"
 
 Moment
-Simultaneous_music::length_mom () const
+Simultaneous_music::get_length () const
 {
   return Music_sequence::maximum_length (get_mus_property ("elements"));
 }
@@ -16,19 +16,8 @@ Simultaneous_music::start_mom () const
   return Music_sequence::minimum_start (get_mus_property ("elements"));
 }
 
-Simultaneous_music::Simultaneous_music (SCM head)
-  : Music_sequence (head)
+Simultaneous_music::Simultaneous_music()
 {
-  set_mus_property ("iterator-ctor",
-                   Simultaneous_music_iterator::constructor_cxx_function);
-}
-
-Simultaneous_music::Simultaneous_music ()
-  : Music_sequence ()
-{
-  set_mus_property ("iterator-ctor",
-                   Simultaneous_music_iterator::constructor_cxx_function);
-  
 }
 
 Pitch