if (tg && dir == DOWN)
{
tg->precomputed_translator_foreach (idx);
- tg->call_precomputed_self_method (idx);
}
for (SCM s = c->children_contexts (); scm_is_pair (s);
if (tg && dir == UP)
{
tg->precomputed_translator_foreach (idx);
- tg->call_precomputed_self_method (idx);
}
}
}
}
- fetch_precomputable_methods (precomputed_self_method_bindings_);
}
void
bindings[i]();
}
-void
-Translator_group::fetch_precomputable_methods (SCM ptrs[])
-{
- for (int i = 0; i < TRANSLATOR_METHOD_PRECOMPUTE_COUNT; i++)
- ptrs[i] = SCM_UNDEFINED;
-}
-
-void
-Translator_group::call_precomputed_self_method (Translator_precompute_index idx)
-{
- if (!SCM_UNBNDP (precomputed_self_method_bindings_[idx]))
- scm_call_1 (precomputed_self_method_bindings_[idx], self_scm ());
-}
-
Translator_group::~Translator_group ()
{
}
-const char Translator_group::type_p_name_[] = "ly:translator-group?";
+const char * const Translator_group::type_p_name_ = "ly:translator-group?";
int
Translator_group::print_smob (SCM port, scm_print_state *) const