]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/translator-group-ctors.cc
Run `make grand-replace'.
[lilypond.git] / lily / translator-group-ctors.cc
index ead329095bb9c914515377efb686cb954818f1cd..f787b94399cdc31c400e5a32d099f640a5e4c66f 100644 (file)
@@ -3,34 +3,36 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
+  (c) 2005--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
-
 #include "score-engraver.hh"
 #include "score-performer.hh"
-#include "engraver-group-engraver.hh"
-#include "performer-group-performer.hh"
-#include "recording-group-engraver.hh"
+#include "warn.hh"
+#include "international.hh"
 
 /*
   Quick & dirty.
- */
+*/
 Translator_group *
 get_translator_group (SCM sym)
 {
-  if (sym == ly_symbol2scm ("Engraver_group_engraver"))
-    return new Engraver_group_engraver ();
-  else if (sym == ly_symbol2scm ("Performer_group_performer"))
-    return new Performer_group_performer();
+  if (sym == ly_symbol2scm ("Engraver_group"))
+    return new Engraver_group ();
+  else if (sym == ly_symbol2scm ("Performer_group"))
+    return new Performer_group ();
   else if (sym == ly_symbol2scm ("Score_engraver"))
-    return new Score_engraver();
+    return new Score_engraver ();
   else if (sym == ly_symbol2scm ("Score_performer"))
-    return new Score_performer();
-  else if (sym == ly_symbol2scm ("Recording_group_engraver"))
-    return new Recording_group_engraver();
+    return new Score_performer ();
 
-  assert (0);
+  error (_f ("fatal error. Couldn't find type: %s",
+            ly_symbol2string (sym).c_str ()));
+  scm_flush (scm_current_error_port ());
+  scm_display (sym, scm_current_error_port ());
+  scm_flush (scm_current_error_port ());
+  
+  exit (2);
+  
   return 0;
 }