+ - It is called before any user information enters the translators.
+ (i.e. any \property or event is not processed yet.)
+
+ */
+void
+Translator::start_translation_timestep ()
+{
+}
+
+void
+Translator::initialize ()
+{
+}
+
+void
+Translator::finalize ()
+{
+}
+
+
+/*
+
+ SMOBS
+
+*/
+SCM
+Translator::mark_smob (SCM sm)
+{
+ Translator * me = (Translator*) SCM_CELL_WORD_1 (sm);
+ scm_gc_mark (me->simple_trans_list_);
+ scm_gc_mark (me->trans_group_list_);
+ scm_gc_mark (me->definition_);
+ scm_gc_mark (me->properties_scm_);
+ scm_gc_mark (me->accepts_list_);
+
+ return me->properties_scm_;
+}
+
+SCM
+Translator::translator_description () const
+{
+ return SCM_EOL;
+}
+
+SCM
+Translator::static_translator_description ()const
+{
+ return SCM_EOL;
+}
+
+
+IMPLEMENT_SMOBS (Translator);
+IMPLEMENT_DEFAULT_EQUAL_P (Translator);
+IMPLEMENT_TYPE_P(Translator,"ly:translator?");
+
+SCM
+Translator::get_simple_trans_list()
+{
+ return SCM_EOL;