Run `make grand-replace'.

[lilypond.git] / lily / script-column-engraver.cc

diff --git a/lily/script-column-engraver.cc b/lily/script-column-engraver.cc
index b6b53162cf242aa5f50e18695aee92eb022af6cb..6821c51733b7a292c27e0ef833c28982caa06ad5 100644 (file)
--- a/lily/script-column-engraver.cc
+++ b/lily/script-column-engraver.cc
@@ -1,93 +1,83 @@
-/*   
-  g-script-column-engraver.cc --  implement Script_column_engraver
-  
+/*
+  script-column-engraver.cc -- implement Script_column_engraver
+
   source file of the GNU LilyPond music typesetter
-  
-  (c) 1999--2001 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-  
- */
+
+  (c) 1999--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
+*/
 
 #include "engraver.hh"
 #include "script-column.hh"
-#include "item.hh"
 #include "side-position-interface.hh"
+#include "item.hh"
+
+#include "translator.icc"
 
 /**
    Find potentially colliding scripts, and put them in a
    Script_column, that will fix the collisions.  */
 class Script_column_engraver : public Engraver
 {
-  Grob *scol_p_;
-  Link_array<Item> script_l_arr_;
+  Grob *script_column_;
+  vector<Grob*> scripts_;
 
 public:
-  TRANSLATOR_DECLARATIONS(Script_column_engraver);
+  TRANSLATOR_DECLARATIONS (Script_column_engraver);
 protected:
-  virtual void acknowledge_grob (Grob_info);
-  virtual void create_grobs ();
-  virtual void stop_translation_timestep ();
-  virtual void start_translation_timestep ();
+  DECLARE_ACKNOWLEDGER (side_position);
+  void process_acknowledged ();
+  void stop_translation_timestep ();
 };
 
-
 Script_column_engraver::Script_column_engraver ()
 {
-  scol_p_ =0;
+  script_column_ = 0;
 }
 
 void
 Script_column_engraver::stop_translation_timestep ()
 {
-  if (scol_p_)
+  if (script_column_)
     {
-      typeset_grob (scol_p_);
-      scol_p_ =0;
+      for (vsize i = 0; i < scripts_.size (); i++)
+       if (Side_position_interface::get_axis (scripts_[i]) == Y_AXIS)
+         Script_column::add_side_positioned (script_column_, scripts_[i]);
     }
-}
-
-void
-Script_column_engraver::start_translation_timestep ()
-{
-  script_l_arr_.clear ();
 
+  script_column_ = 0;
+  scripts_.clear ();
 }
 
 void
-Script_column_engraver::acknowledge_grob (Grob_info inf) 
+Script_column_engraver::acknowledge_side_position (Grob_info inf)
 {
-  Item *thing = dynamic_cast<Item*> (inf.grob_l_);
-  if (thing && Side_position_interface::has_interface (inf.grob_l_)) // ugh FIXME
+  Item *thing = dynamic_cast<Item *> (inf.grob ());
+  if (thing)
     {
-      if (!Item::breakable_b (thing)
-         && Side_position_interface::get_axis (inf.grob_l_) == Y_AXIS)
-       {
-         script_l_arr_.push (thing);
-       }
+      if (!Item::is_non_musical (thing))
+       scripts_.push_back (thing);
     }
 }
 
 void
-Script_column_engraver::create_grobs ()
+Script_column_engraver::process_acknowledged ()
 {
-  if (!scol_p_ && script_l_arr_.size () > 1)
-    {
-      scol_p_ = new Item (get_property ("ScriptColumn"));
+  if (!script_column_ && scripts_.size () > 1)
+    script_column_ = make_item ("ScriptColumn", SCM_EOL);
+}
 
+ADD_ACKNOWLEDGER (Script_column_engraver, side_position);
+ADD_TRANSLATOR (Script_column_engraver,
+               /* doc */
+               "Find potentially colliding scripts and put them into a"
+               " @code{ScriptColumn} object; that will fix the collisions.",
 
-      announce_grob (scol_p_, 0);
-    }
+               /* create */
+               "ScriptColumn ",
 
-  if (scol_p_)
-    {
-      for (int i=0; i < script_l_arr_.size (); i++)
-       Script_column::add_staff_sided (scol_p_, script_l_arr_[i]);
-      script_l_arr_.clear ();
-    }
-}
+               /* read */
+               "",
 
-ENTER_DESCRIPTION(Script_column_engraver,
-/* descr */       "",
-/* creats*/       "ScriptColumn",
-/* acks  */       "side-position-interface",
-/* reads */       "",
-/* write */       "");
+               /* write */
+               ""
+               );