]> git.donarmstrong.com Git - lilypond.git/blob - lily/translator-group-ctors.cc
* lily/include/translator.icc: new file.
[lilypond.git] / 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
10
11 #include "score-engraver.hh"
12 #include "score-performer.hh"
13 #include "engraver-group-engraver.hh"
14 #include "performer-group-performer.hh"
15 #include "recording-group-engraver.hh"
16
17 /*
18   Quick & dirty.
19  */
20 Translator_group *
21 get_translator_group (SCM sym)
22 {
23   if (sym == ly_symbol2scm ("Engraver_group_engraver"))
24     return new Engraver_group_engraver ();
25   else if (sym == ly_symbol2scm ("Performer_group_performer"))
26     return new Performer_group_performer();
27   else if (sym == ly_symbol2scm ("Score_engraver"))
28     return new Score_engraver();
29   else if (sym == ly_symbol2scm ("Score_performer"))
30     return new Score_performer();
31   else if (sym == ly_symbol2scm ("Recording_group_engraver"))
32     return new Recording_group_engraver();
33
34   assert (0);
35   return 0;
36 }