lily/translator-group-ctors.cc

   1 /*
   2   translator-group-ctors.cc -- implement Translator_group factory.
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
   7 */
   8
   9 #include "score-engraver.hh"
  10 #include "score-performer.hh"
  11 #include "engraver-group-engraver.hh"
  12 #include "performer-group-performer.hh"
  13 #include "recording-group-engraver.hh"
  14
  15 /*
  16   Quick & dirty.
  17 */
  18 Translator_group *
  19 get_translator_group (SCM sym)
  20 {
  21   if (sym == ly_symbol2scm ("Engraver_group_engraver"))
  22     return new Engraver_group_engraver ();
  23   else if (sym == ly_symbol2scm ("Performer_group_performer"))
  24     return new Performer_group_performer ();
  25   else if (sym == ly_symbol2scm ("Score_engraver"))
  26     return new Score_engraver ();
  27   else if (sym == ly_symbol2scm ("Score_performer"))
  28     return new Score_performer ();
  29   else if (sym == ly_symbol2scm ("Recording_group_engraver"))
  30     return new Recording_group_engraver ();
  31
  32   assert (0);
  33   return 0;
  34 }