+
+void
+Translator_group::fetch_precomputable_methods (Translator_group_void_method ptrs[])
+{
+ for (int i = 0; i < TRANSLATOR_METHOD_PRECOMPUTE_COUNT; i++)
+ ptrs[i] = 0;
+}
+
+void
+Translator_group::call_precomputed_self_method (Translator_precompute_index idx)
+{
+ if (precomputed_self_method_bindings_[idx])
+ (*precomputed_self_method_bindings_[idx])(this);
+}
+
+
+Translator_group::~Translator_group ()
+{
+}
+
+#include "ly-smobs.icc"
+
+IMPLEMENT_SMOBS (Translator_group);
+IMPLEMENT_DEFAULT_EQUAL_P (Translator_group);
+IMPLEMENT_TYPE_P (Translator_group, "ly:translator-group?");
+
+
+int
+Translator_group::print_smob (SCM s, SCM port, scm_print_state *)
+{
+ Translator_group *me = (Translator_group *) SCM_CELL_WORD_1 (s);
+ scm_puts ("#<Translator_group ", port);
+ scm_puts (classname (me), port);
+ scm_display (me->simple_trans_list_, port);
+ scm_puts (" >", port);
+ return 1;
+}
+
+
+SCM
+Translator_group::mark_smob (SCM smob)
+{
+ Translator_group *me = (Translator_group*)SCM_CELL_WORD_1 (smob);
+
+ me->derived_mark ();
+
+ return me->simple_trans_list_;
+}
+