* lily/ various: Introduce stream events of types Prepare,

[lilypond.git] / lily / score-context.cc

diff --git a/lily/score-context.cc b/lily/score-context.cc
index acabbe813f20f2275f561320042343a7fc98d6a6..60ef4905170671bd29c94b3d9595afa8dd78fa12 100644 (file)
--- a/lily/score-context.cc
+++ b/lily/score-context.cc
@@ -1,45 +1,39 @@
-/*   
-       score-context.cc -- implement Score_context
+/*
+  score-context.cc -- implement Score_context
 
-       source file of the GNU LilyPond music typesetter
+  source file of the GNU LilyPond music typesetter
 
-       (c) 2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2004--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "score-context.hh"
+
 #include "score-translator.hh"
 
 void
-Score_context::prepare (Moment w)
+Score_context::prepare (Moment)
 {
-  Translator*  t = unsmob_translator (implementation_);
-  Score_translator * s = dynamic_cast<Score_translator *> (t);
-
-  s->prepare (w);
 }
 
 void
 Score_context::finish ()
 {
-  Translator*  t = unsmob_translator (implementation_);
-  Score_translator * s = dynamic_cast<Score_translator *> (t);
-
-  s->finish ();
 }
 
 void
 Score_context::one_time_step ()
 {
-  Translator*  t = unsmob_translator (implementation_);
-  Score_translator * s = dynamic_cast<Score_translator *> (t);
-  s->one_time_step ();
 }
 
-Music_output*
+SCM
 Score_context::get_output ()
 {
-  Translator *t = unsmob_translator (implementation_);
+  Translator_group *t = implementation ();
   Score_translator *s = dynamic_cast<Score_translator *> (t);
   return s->get_output ();
 }
 
+Score_context::Score_context (Object_key const *key)
+  : Context (key)
+{
+}