Doc-es: update Notation/Vocal.

[lilypond.git] / lily / include / scheme-engraver.hh

diff --git a/lily/include/scheme-engraver.hh b/lily/include/scheme-engraver.hh
index 13ffa8aba39b63f6b3d9045f9877128cac7ac756..e22e572c7fe6ec15c07d2728b55970e25b19096a 100644 (file)
--- a/lily/include/scheme-engraver.hh
+++ b/lily/include/scheme-engraver.hh
@@ -1,9 +1,9 @@
-/* 
+/*
   scheme-engraver.hh -- declare Scheme_engraver
-  
+
   source file of the GNU LilyPond music typesetter
-  
-  Copyright (c) 2009--2010 Han-Wen Nienhuys <hanwen@lilypond.org>
+
+  Copyright (c) 2009--2015 Han-Wen Nienhuys <hanwen@lilypond.org>
 
   LilyPond is free software: you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
@@ -16,8 +16,7 @@
   GNU General Public License for more details.
 
   You should have received a copy of the GNU General Public License
-  along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.  
-  
+  along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #ifndef SCHEME_ENGRAVER_HH
@@ -25,16 +24,16 @@
 
 #include "engraver.hh"
 
-class Scheme_engraver : public Engraver {
-public:
+class Scheme_engraver : public Engraver
+{
   void init_from_scheme (SCM definition);
-  TRANSLATOR_DECLARATIONS_NO_LISTENER (Scheme_engraver);
-  
-  static Listener get_listener (void *generic_arg, SCM event);
-  
+public:
+  TRANSLATOR_FAMILY_DECLARATIONS (Scheme_engraver);
+  Scheme_engraver (SCM definition);
+
 protected:
   ~Scheme_engraver ();
-  
+
   void stop_translation_timestep ();
   void start_translation_timestep ();
   void process_music ();
@@ -43,7 +42,7 @@ protected:
   virtual void initialize ();
   virtual void finalize ();
   virtual void derived_mark () const;
-  virtual translator_listener_record *get_listener_list () const;
+  virtual SCM get_listener_list () const;
   virtual bool must_be_last () const;
 
 private:
@@ -54,7 +53,7 @@ private:
   DECLARE_END_ACKNOWLEDGER (grob);
 
   bool must_be_last_;
-  
+
   SCM acknowledge_grob_function_;
   SCM stop_translation_timestep_function_;
   SCM start_translation_timestep_function_;
@@ -70,9 +69,7 @@ private:
   // Alist of listened-symbol . scheme-function
   SCM listeners_alist_;
 
-  // We dont use this, but need it for the documentation boilerplate.
-  static translator_listener_record *listener_list_;
-  translator_listener_record *per_instance_listeners_;
+  SCM per_instance_listeners_;
 };
 
 #endif /* SCHEME_ENGRAVER_HH */